سلام خدمت اساتید محترم
خیلی جستجو کردم اما مورد مناسب پیدا نکردم
یه سوال دارم و اون اینکه میخوام اطلاعات بانک اکسس را با کد به اسکیوال انتقال بدم (تعداد زیادی رکورد) البته با کد ویژوال بیسیک
کسی هست بتونه منو کمک کنه؟؟؟
با این کد اطلاعات را ویرایش میکنم
Dim Cn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim Cnxn As ADODB.Connection
Dim strCnxn As String
Set Cnxn = New ADODB.Connection
strCnxn = " Provider = sqloledb;Data Source = 'salar\SQLEXPRESS'" & _
";Initial Catalog = 'mainP' ; Integrated Security = SSPI "
Cnxn.Open strCnxn
Set rst = New ADODB.Recordset
rst.CursorLocation = adUseClient
Set rst = Cnxn.Execute("UPDATE tbl_tran_snd SET codep = '" & Text22 & "' WHERE codea = " & Me.shmelli.Column(4))