سوالي در مورد adodc [بایگانی]

سيد محمد علي رحيمي

دوشنبه 13 آبان 1387, 10:31 صبح

باسلام
دوستان در يك بانك اطلاعاتي 5 جدول دارم كه جدول 2 تا 5 فيلد id اونها با فيلد id جدول شماره يك وصل شده(بصورت ريليشن در اكسس) حالا مي خوام در يك فرم هر 5 جدول رو بيارم كه اگر در جدول 1 بطور مثال id=1 بود در جدوال ديگر فقط اون دسته از اطلاعاتي كه id آنها برابر با id جدول شماره يك بود نشان داده بشه البته از خصوصيت فيلتر -ركوردست ADODC استفاده كردم و جواب هم گرفتم ولي وقتي مي خواهيم درتمامي جداول ركورد جديد ثبت كنيم پيام خطا ميده لطفاًراهنماييم كنيد.
:متفکر::افسرده:

moj_vb

دوشنبه 13 آبان 1387, 13:17 عصر

With rsdata
If .State = adStateOpen Then .Close
.ActiveConnection = cndata
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.Source = "SELECT
FROM (((1 LEFT JOIN 2 ON [1].id = [2].id) LEFT JOIN 3 ON [1].id = [3].id) LEFT JOIN 4 ON [1].id = [4].id) LEFT JOIN 5 ON [1].id = [5].id"
.Open Options:=adCmdText

سيد محمد علي رحيمي

سه شنبه 14 آبان 1387, 08:02 صبح

با تشكر
فقط ميشه يك كمي بيشتر توضيح بدين
اين دستور رادر كجا بايد استفاده كنم منظور شما اينكه من با يك adodc كاركنم يك كوچولو توضيح..............

moj_vb

پنج شنبه 16 آبان 1387, 09:41 صبح

در یک ماژول دستور زیر را وارد کنید
Public cndata As New ADODB.Connection
در form load کانکشن را تعریف کنید