رمز برای بانک اکسس

[Scorpion]

سلام
آقا واسه بانک اکسس چطور pass بزارم
و از vb اجراش کنم
در ضمن vb فقط با access 97 / 98 کار میکنه ضاهرا

با 2000 به بهد مشکل داره ؟
یه توضیح بدین
یا لینک مرتبط
ممنون

[hamed_Arfaee]

میتونی از روشهای جدید ارتباطی استفاده کنی
تو مثال زیر من یک نمونه اتصال با Adodb نوشتم ببین

[Scorpion]

اخه من یه پروژه دارم که خیلی زیاده اگی متد بانک رو عوض کنم همش بهم میریزه

من مشکلم اینه

Set db = OpenDatabase(App.Path + "\stid.mdb")
With db
Set rst1 = .OpenRecordset("Address")
End With
ComboSex.AddItem "PNP"
ComboSex.AddItem "NPN"
'--

Set cnn1 = New ADODB.Connection
cnn1.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn1.Properties("Data Source") = App.Path + "\stid.mdb"
cnn1.Open App.Path + "\stid.mdb", "Admin"

پسورد را در خط آخر جلو admin مینویسم ولی برنامه error میده
Invalid password
????
che konam ?

[Scorpion]

اقا هرکی میتونه زوتر جواب بده منتظرم مرسی
×

[Amin4u]

سلام

ميبخشيد من يه تاپيک ديگه در همين زمينه زدم!
ولاي جواب نگرفتم اينو آوردمش بالا

سلام
آقا واسه بانک اکسس چطور pass بزارم
و از vb اجراش کنم
در ضمن vb فقط با access 97 / 98  کار میکنه ضاهرا

با 2000 به بهد مشکل داره ؟
یه توضیح بدین
یا لینک مرتبط
ممنون

دوست عزيز چي شد از شما؟!
تونستين وصل بشين؟!

منم فکر ميکنم با 2000 به بعد مشکل داشته باشه!
چون قبلآ وقتي آفيس 200 رو سيستمم نصب بود با اين کد ميتونستم وصل بشم

کد:

("Set db = OpenDatabase(App.Path & "\db.mdb", False, False, ";pwd=pas

دوستان اگه کسي چيزي ميدونه کمک کنه لطفآ!

[Scorpion]

man khodamm itoonam moshkeli nadare hamed jan agi bashe 3 soote hale ke gerefttare daneshgast didamesh mifrestam biyad inja

[Darg]

در ضمن vb فقط با access 97 / 98  کار میکنه ضاهرا
با 2000 به بهد مشکل داره ؟

برای استفاده از 2000 به بعد باید
Visual Studio 6.0 SP6 رو نصب کنی . همین
با نصب SP6 هم مشکلت حل میشه هم خیلی از باگ های قبلی درش
رفع شده و هم کنترل های با ورژن بالاتری خواهی داشت...

[Amin4u]

در ضمن vb فقط با access 97 / 98  کار میکنه ضاهرا
با 2000 به بهد مشکل داره ؟

برای استفاده از 2000 به بعد باید
Visual Studio 6.0 SP6 رو نصب کنی . همین
با نصب SP6 هم مشکلت حل میشه هم خیلی از باگ های قبلی درش
رفع شده و هم کنترل های با ورژن بالاتری خواهی داشت...

ممنون دوست عزيز
دارم از اينجا دانلودش ميکنم:
http://www.microsoft.com/downloads/detai...laylang=en

[Amin4u]

VS6 رو نصب کردم!
ولي هنوز مشکل حل نشده!
نميتونم با کدي که بالا گذوشتم به بانک اکسس پسورد دار وصل بشم!
کد اتصالو درست نوشتم؟
همين طوري بايد وصل شد؟!

دوستان کمکم کنين لطفآ خيلي عجله دارم!

ممنون

[behzad-khazama]

درود بر ایرانیان .
از ADO استقاده کنید برای بانکهای 2000 به بالا . برا کانکشن استرین هم از این  به عنوان نمونه .

کد:

[align=left]Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\mydb.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123456"[/align]

[Amin4u]

ممنون بهزاد جان

منتها من برنامه رو کاملآ نوشتم!
و نميتونم ديگه تغييرش بدم!

سلام دوستان

من با رفرنسهاي
Microsoft Data Environment Instance 1.0
Microsoft DAO 3.51 Object Library

اين شکلي با ديتابيس ارتباط برقرار ميکنم

کد:

Dim db As Database
Dim rs As Recordset

کد:

Set db = OpenDatabase(App.Path & "\X.mdb")
Set rs = db.OpenRecordset("Table Name")

با اين وجود چه طوري ميتونم به ديتابيس اکسس پسورد دارد متصل بشم؟

قاعدتآ بايد با اين کد وصل بشه!
ولي نميشه!!!!

کد:

("Set db = OpenDatabase(App.Path & "\db.mdb", False, False, ";pwd=pas

خيلي کارم گيره
ممنون ميشم اگه کسي کمکم کنه.م