سوال درباره دیتاگرید

[meysamg]

با سلام :

هرچی دنبال این مطلب گشتم پیدا نکردم - من میخوام در یه دیتاگریدی گه دارم ، مثلا فیلد 1 در فیلد 2 ضرب بشه و در فیلد 3 قرار بگیره. یعنی فیلد 3 اتوماتیک حاصل ضرب فیلد 1 و 2 باشه. دیتابیس هم اکسس هست . لطفا راهنمایی کنید ...
راستی احتمال میدهم این موضوع به دیتاگرید ربط نداشته باشه و در خود دیتابیس باید اینکار انجام بشه - اساتید راهنمایی کنید ....

با تشکر

[meysamg]

با سلام مجدد :

من تونستم با اکسس 2002 کوئری را بسازم ولی نمیدونم چطور در دیتاگرید از اون استفاده کنم. وقتی که برنامه را اجرا میکنم ، کوئری عمل نمیکنه و فیلد سوم همچنان خالی هست ولی در خود اکسس که کوئری را اجرا میکنم کار میکنه.

اساتید منتظر راهنمایی هستم .... :افسرده:

[red11011]

سلام
شما هم میتونید مقادیر پارامتری در دستورات ADODC رو استفاده کنید
هم میتونید از این برنامه استفاده کنید که براتون گذاشتم
هم از حلقه ها استفاده کنیدکه من خودم پیشنهاد نمیکنم
هم با استفاده از اجرای کویری درون اکسس به نتیجه دلخواه برسین
http://www.persianupload.com/4996131

[red11011]

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

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Command1_Click()
If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient
rs.Open "UPDATE Table1 SET Table1.F3 = Table1!F1*Table1!F2;", cn, adOpenKeyset, adLockPessimistic, adCmdText
rs.Open "SELECT * FROM TABLE1;", cn, adOpenKeyset, adLockPessimistic, adCmdText
Set Me.DataGrid1.DataSource = rs
Set rs = Nothing
Set cn = Nothing
End Sub
Private Sub Form_Load()
rs.CursorLocation = adUseClient
If cn.State = 1 Then cn.Close
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\RED11011.mdb;Persist Security Info=False"
rs.Open "SELECT * FROM TABLE1;", cn, adOpenKeyset, adLockPessimistic, adCmdText
Set Me.DataGrid1.DataSource = rs
End Sub