کمک در مورد combo1

[arashrj]

سلام

عزیز من دکمه ریفرش رو همین طوری قرار دادم اگه حذف هم کنید مشکلی پیش نمیاد (امتحان کن متوجه میشی)

در مورد سوال دوم
کار مشکلی نیست
اما باید خاصیت Style رو به 0-Standard تغییر بدی
بعد هم این کد رو اضافه کن

کد:

Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
On Error GoTo Er1
    cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0 ;Data Source=" & App.Path & "\db1.mdb"
    rst.Open "Test", cnn, adOpenKeyset, adLockOptimistic
    rst.AddNew
    rst!Name = Combo1.Text
    rst.Update
    rst.Close
    cnn.Close
    Set cnn = Nothing
    Set rst = Nothing
    Combo1.Clear
    Refresh_Click
    Combo1.ListIndex = Combo1.ListCount - 1
End If
Exit Sub
Er1:
MsgBox Err.Description
End Sub

اگه مشکلی بود حتما من رو مطلع کن

موفق باشی
خدانگهدار

[jaber]

دوست عزیز باز هم منو شرمنده خودتون کردین
میگم چطوره شما که از adodc استفاده نکردین میشه بدونه کد نویسی
واسه وصل کردن به دیتابیس از adodc استفاده کنید ؟ که کد های زیر را نخواد بنویسی
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0 ;Data Source=" & App.Path & "\db1.mdb"
rst.Open "Test", cnn, adOpenKeyset, adLockOptimistic, adCmdTable
مثلا adodc رو بیار رو فرم از connectionString وصلش کن که نیاز به کد نباشه
تا گیچ کننده نباشه
من رفرش شما رو برداشتم ایرور داد میشه اینو هم کمک کنید واقعا شرمنده شما شدم امروز
اصلا یک سورس دیگه بسازید تا هم شما راحت تر باشید هم من هر دوی ما گیچ نشیم سورس رو همینجا هم بذاری عالیه
در ضمن من تمام چیز های من table هست کد delete شما sql هست
آیا مشکلی پیش نمی آد ؟

[arashrj]

سلام
من نگفتم اون ریفرش رو حذف کن گفتم کامند رو حذف کن(اگه نخوای اون ریفرش رو در داخل برنامه اسفاده کنی باید اون کد رو چندین بار تکرار کنی که این کار هم غیر منطقی یه )

الان هم وقت ندارم اون کد رو دوباره بنویسم (در اولین فرصت حتما اقدادم به نوشتن می کنم)

البته برای من فرق نمی کنه اما به این روش که نوشتم خیلی بهتره تا از آبجکت ها استفاده کنی

موفق باشی
خدانگهدار

[jaber]

مثلا به جای دکمه از رویداد لود فرم استفاده کن و بقیه سوالات ام رو هم خواهشا یم نگاهی بنداز کار من به دست تو حل میشه آرش جان

[jaber]

اگه میشه این آی دی رو هم add کن تو یاهو من هرچی add میکنم add نمیشی !!
id : jaber.aghidat

[jaber]

ممنون از کمکت آرش جان

جا داره تشکر کنم از آرش جان در این تاپیک که زحمت های زیادی کشیدند
واقعا قدرش رو بدونید خیلی زحمت می کشه والا امیدوارم خدا اجرش رو بهش بده

[arashrj]

سلام

خواهش می کنم عزیزم
من فقط وظیفم رو انجام دادم

موفق باشید
خدانگهدار

[jaber]

میگم پروژه قبلی سرچ هم داشت مثلا وقتی حرف اول کلمه رو میزدی می اومد

اما این پروژه جدیده نمیاد چکار کنم آرش جان ؟

[arashrj]

سلام

عزیزم خاصیت Style در این حالت 0-Dropdown Combo است اما در پروژه قبلی 2-Dropdown List بود

موفق باشی
خدانگهدار

[jaber]

میخوام هم بهش بتونم اضافه کنم هم وقتی کلمه اول رو زدم بیاد باید چکار کنم آرش جان

[arashrj]

سلام

این هم لینک دانلود (اگه بازم مشکلی بود حتما به من اطلاع بده)
http://arashrj.persiangig.com/download/dbandcombo3.zip

موفق باشی
خدانگهدار