منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : ارجو المساعدة برنامج بسيط عباره عن دليل تليفون (/showthread.php?tid=1009)

الصفحات: 1 2 3


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - أبو عمر - 23-11-13

يفضل في عملية البحث أن تضع فورم جديد
لماذا؟
لانك بعملية البحث ستقطع الاتصال بالجدول وتعيد الاتصال به من جديد
مثلا
PHP كود :
Rs.open "Table1",db,1,
كان الاتصال بالجدوال Table1 دون شروط
ولكن في حال البحث مثلا عن الرقم
PHP كود :
if Rs.state =1 then Rs.close
Rs
.open "Select * from Table1 where number like '" text1.text "'",db,1,
كما تلاحظ قطعنا الاتصال واعدناه بشرط البحث أو الاستعلام في الارقام استخدمنا text1
لاستبدال text1 ب inputbox تقوم بتعريف كائن نصي مثلا
PHP كود :
Dim mytext As String
mytext 
InputBox("يجب ان يكون المدخل رقما""بحث""اكتب الرقم هنا"
[/php][/code]
ونستبدل text1 ب mytext
سأرى مثالك وأحاول التعديل عليه إن شاء الله


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - hhmm6 - 23-11-13

اشكر الاخ asto على تعبه ومجهوده معى
كما اشكر Lion_Ksa على الرد
قابلنى مشكله اخرى عند تحميل البرنامج على اكثر من جهاز لم يعمل
رغم انى عملت تحزيم للبرنامج بأستخدام برنامج Smart Install Maker
رجاء المساعده حتى يعمل على الاجهزه الاخرى
اليكم البرنامج بعد التعديل لاكن لم اعدل الترتيب التلقائى
http://www.ot2.com/download/16163/hh.rar.html


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - أبو عمر - 23-11-13

صبرك دقايق بس الله يخليك
مشكلتك في اتصال قاعدة البيانات ب data1
هناك بدائل اخرى افضل منها بكثير ستراها في المثال
جاري التعديل على مثالك أخي فلا تقلق


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - asto - 23-11-13

استعمل Package & Deployment Wizard الذي ياتي مع الفيجوال بيسك و تجده في قائمة ابدأ ثم البرامج ثم Microsoft Visual Basic 6.0 ثم Microsoft Visual Basic 6.0 Tools

و اكتب في الفورم لود

كود :
Data1.DatabaseName = App.Path & "\اسم ملف القاعدة.MDB"

ثم اعد انشاء الملف التنفيذي (البرنامج)


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - أبو عمر - 23-11-13

تفضل اخي الكريم
تتبع الاكواد واي شي يشكل عليك قل لي هنا


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - hhmm6 - 23-11-13

بتجربه البرنامج لم يعمل


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - أبو عمر - 23-11-13

اخي بارك الله فيك
فك الضغط عن الملفات كلها ولا تقم بفتح الفورم مباشرة من الملف المضغوط
يتوجب عليك فتح ملف المشروع المسمى Project1.vbp


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - hhmm6 - 23-11-13

(23-11-13, 03:04 AM)Lion_Ksa كتب : اخي بارك الله فيك
فك الضغط عن الملفات كلها ولا تقم بفتح الفورم مباشرة من الملف المضغوط
يتوجب عليك فتح ملف المشروع المسمى Project1.vbp

تمام اخى العزيز اشكرك على مجهودك الكبير
الان يوجد بحث واحد فقط بواسطه الرقم
لو حبيت اعمل بحث بالاطراف نفس الكود مع تغيير الاسم؟


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - أبو عمر - 23-11-13

لو تشوف الكود راح تلاقيه يبحث في الحقلين مع بعض
يعني ممكن تكتب رقم أو طرف


RE: ارجو المساعدة برنامج بسيط عباره عن دليل تليفون - hhmm6 - 23-11-13

(23-11-13, 03:34 AM)Lion_Ksa كتب : لو تشوف الكود راح تلاقيه يبحث في الحقلين مع بعض
يعني ممكن تكتب رقم أو طرف

تمام الله ينور عليك ويجعله فى ميزان حسناتك تقريبا كل الكودات مختلف عن السايق
فعلا كدا افضل كثيرا من الاول
يتبقى كيف اشغله على الاجهزه الاخرى انا عارف انى تعبتك معايا
وشكرا على ما قدمت