ارتباط اکتیو ریپورت با بانک اطلاعاتی پسورد دار [بایگانی]

View Full Version : ارتباط اکتیو ریپورت با بانک اطلاعاتی پسورد دار

maryamb

چهارشنبه 17 مهر 1387, 09:41 صبح

با سلام
من وقتی رو پایگاه دادم که اکسس هست ، پسورد میذارم ، ریپورت هام ارور می دن ولی وقتی پسورد رو بر می دارم درست می شن.علت چی هست؟؟
این ارور ها هم فقط برای ریپورت ها هست و فرم هام ارور نمی دن

ASKaffash

چهارشنبه 17 مهر 1387, 13:38 عصر

سلام
از ConnectionString برای اکتیو است (عوض کنید)

maryamb

چهارشنبه 17 مهر 1387, 14:44 عصر

من connection string رو تو فرم تعریف کردم و پسورد رو هم براش گذاشتم.اشکال از اشتباه نوشتن پسورد واین چیزا نیست انگار

hrj1981

چهارشنبه 17 مهر 1387, 15:25 عصر

امكان دارد نمونه سورس خود را قرار دهيد؟

ASKaffash

چهارشنبه 17 مهر 1387, 16:20 عصر

من connection string رو تو فرم تعریف کردم و پسورد رو هم براش گذاشتم.اشکال از اشتباه نوشتن پسورد واین چیزا نیست انگار

سلام
منظور این است که Password بخشی از ConnectionString است و باید ConnectionString را برای اکتیو عوض کنید.

maryamb

پنج شنبه 18 مهر 1387, 09:29 صبح

dbase = App.Path & "\data\" & salmali & "\data.mdb;Jet OLEDB:Database Password=m*b$mehr$*h#"
این هم کد داخل اکتیو ریپورت نمونه 1:

DAODataControl1.DatabaseName = dbase
DAODataControl1.RecordSource = "select * from sarfasl order by code "
Field1.DataField = "code"
Field2.DataField = "vaziat"
Field3.DataField = "sharh"

این هم نمونه 2 که از داخل فرم بهش مقدار می دم :

With activereport1.dc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & dbase
.Source = "select * from qdayem where sarfasl.klidsarfasl=" & txtklidsarfasl.Text & " order by dayem "
.refresh
End With
اررور میده ولی وقتی فقط پسورد رو بر می دارم درست می شه

hrj1981

پنج شنبه 18 مهر 1387, 10:27 صبح

اين كد را قرار بده ببين درست مي شود

With activereport1.dc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\data\" & salmali & "\data.mdb;Jet OLEDB:Database Password=m*b$mehr$*h#;Persist Security Info=False"
.Source = "select * from qdayem where sarfasl.klidsarfasl=" & txtklidsarfasl.Text & " order by dayem "
.refresh
End With

hossein.e

پنج شنبه 18 مهر 1387, 12:10 عصر

این کد رو امتحان کنید جواب میده

ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\data\" & salmali & "\data.mdb; Persist Security Info=False;Jet OLEDB:Database Password=m*b$mehr$*