PDA

View Full Version : ارتباط کریستال ریپورت 10 به فایل اکسس پسورد دار



y.saied
شنبه 12 مرداد 1387, 18:12 عصر
با عرض سلام و خسته نباشید

من با اکسس 2003 کار میکنم و بر روی بانک اطلاعاتی پسورد گذاشتم .

حالا میخوام با کریستال ریپورت 10 و با استفاده از گزینه ADO گزارشگیری کنم ولی موقع ارتباط دادن کریستال به اکسس خطا میده و نمیتونم کار کنم .

ولی هنگامی که پسورد رو حذف میکنم ارتباط دادن بخوبی انجام میشه .

اگه کمکم کنین ممنون میشم

y.saied
یک شنبه 13 مرداد 1387, 17:14 عصر
سلام

خب شما با ويزارد كريستال كه گزارش ايجاد كني، در صفحه اي كه نام ديتابيس رو مي خواد مي توني گزينه Secure Login رو علامت بزني و تو اولين قسمت پسورد رو بنويسي


دوست عزیز ازت ممنونم - ولی اصلاً به سئالم توجه نکردی ؟؟
در ضمن اگه ممکنه خودت با روشی که من گفتم یه بار امتحان کن و بعداً راهش و برام بگو

حسین علوی
دوشنبه 14 مرداد 1387, 00:38 صبح
سلام دوست عزیز
قبلا منم یک همچین مشکلی رو داشتم و اینطور حلش کردم(نمیدونم واقعا راه منطقی هست یا نه؟)
مشابه بانک اصلی پسورد دار یک بانک طراحی کن که پسورد نداشته باشه و گزارشتو (کریستال ریپورت)براساس این بانک بدون پسورد بساز(در این بانک جدید چیزی ذخیره نمیشه فقط نقش واسطه رو داره)
حالا توی برنامه بانک پسورد دار رو باز کن و رکورد ستها رو به کریستال ریپورت بفرست مشکل حل میشه.

y.saied
دوشنبه 14 مرداد 1387, 21:12 عصر
سلام دوست عزیز
قبلا منم یک همچین مشکلی رو داشتم و اینطور حلش کردم(نمیدونم واقعا راه منطقی هست یا نه؟)
مشابه بانک اصلی پسورد دار یک بانک طراحی کن که پسورد نداشته باشه و گزارشتو (کریستال ریپورت)براساس این بانک بدون پسورد بساز(در این بانک جدید چیزی ذخیره نمیشه فقط نقش واسطه رو داره)
حالا توی برنامه بانک پسورد دار رو باز کن و رکورد ستها رو به کریستال ریپورت بفرست مشکل حل میشه.

میشه بیشتر و کاملتر توضیح بدی ........... اگه با مثال باشه ممنون میشم

amini699
دوشنبه 14 مرداد 1387, 23:41 عصر
دوست عزیز این کدقبل از لود شدن گزارش بزار حل میشه

For Each CrDBTable In crRept.Database.Tables

CrDBTable.ConnectBufferString = _
"Database Name=" & مسير بانک & ";;Database Type=Access;;" & _
"Database Password=" & پسورد

Next

حسین علوی
سه شنبه 15 مرداد 1387, 05:53 صبح
سلام
یک نمونه براتون نوشتم ببینید
فقط کل پوشه crystal رو در درایو D کپی کنید
در ضمن من از کریستال 9 استفاده کردم

y.saied
جمعه 18 مرداد 1387, 19:01 عصر
دوست عزیز این کدقبل از لود شدن گزارش بزار حل میشه

For Each CrDBTable In crRept.Database.Tables

CrDBTable.ConnectBufferString = _
"Database Name=" & مسير بانک & ";;Database Type=Access;;" & _
"Database Password=" & پسورد

Next



سلام دوست عزیز میشه با یه مثال توضیح بدی

y.saied
چهارشنبه 23 مرداد 1387, 19:21 عصر
دوستان عزيز ؛ نميخواين سوال منه بيسواد رو با مثال جواب بدين

amini699
سه شنبه 29 مرداد 1387, 16:54 عصر
شرمنده این نمونه از بانک پسورد دار

y.saied
یک شنبه 24 آذر 1387, 19:27 عصر
سلام دوستان عزیز
من نتونستم این مشکلم و حل کنم ؛ خواهش میکنم جواب بدین
ممنون

mhmoein
یک شنبه 24 آذر 1387, 19:54 عصر
سلام
دوست عزيز من يك كارهايي كردم ببين درست شده يا نه تو بانك اطلاعاتي يك تغييري بده ببين حل شده.

mpmsoft
یک شنبه 24 آذر 1387, 22:56 عصر
به نظر من بهترین روش پاس دادن DataSource به کریستال هست
توسط این روش دیگر نیازی نیست کریستال بصورت مستقیم به بانک متصل بشه که نیاز باشه پسورد بانک رو بهش پاس بدیم




Dim Conn as New ADODB.Connection
Conn.Open "Provider=Microsoft ...."

Dim Rs as new ADODB.RecordSet

Rs.Open "SELECT * FROM Table1 WHERE ....",conn,1,3

ObjRpt.DataBase.SetDatasource Rs

Cr.ReportSource=rs
Cr.ViewReport

kh-hamid
شنبه 19 بهمن 1387, 07:41 صبح
سلام با تشکر فراوان از دوستان که راه ارتباط با دیتابیس پسورد دار را توضیح دادند .
بعضی از دوستان سوال داشتند که در نمونه گذاشته شده توسط دوستمان amini دچار اشکال هستند و اگر این اشکال زمانی رخ می دهد که برنامه را اجرا و در خط تعاریف متغیر ها (خط 3 تا 5 ) دچار خطا می شوید باید از منوی project و سپس گزینه peferences تیک گزینه های مربوط به کریستال ریپورت را بگذارید .