اتصال vb با sql2000

[حسین علوی]

سلام--با تشکر از شما دوست بزرگوار
من روی فرم یک کنترل adodc2 تعریف کرده ام و در active فرم کدهای زیر را نوشتم
Dim cs As String
Dim Adodc2 As New ADODB.Connection
cs = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=power;Data Source=H1-8EE50C712EF6"
Adodc2.ConnectionString = cs
Adodc2.Open
و در قسمت record sourse کنترل adodc2 جدول table1 بانک را انتخاب کرده ام(بدون کد نویسی)
خطایی که برنامه میدهد:
microsoft][ODBC driver manager]data source name not fond and no defalt driver specified
و در برنامه اصلا بانک را نمی شناسد

[حسین علوی]

سلام دوست عزیز من می خواهم فقط با کد نویسی ارتباط با بانک sql را برقرار کنم اگر میشه در این مورد توضیح بدید.----با تشکر فراوان از شما

[MMR_1344]

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

[lahiji]

روش اول


Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ControlProject;Data Source=SUL69"
Adodc1.RecordSource = "SELECT * FROM ProjectTypeNotType"
Adodc1.Refresh


روش دوم

Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ControlProject;Data Source=SUL69"
Dim cn As ADODB.Connection
cn.Execute "Insert ..."


از هر کدام از این روش ها می تونی استفاده کنی



cn.Execute ""
از دستورات insert یا update یا ... می تونی استفاده کنی

[mf_engineer]

dim adoConn As New ADODB.Connection
dim adoRS As New ADODB.Recordset
dim sqlString As String
adoConn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=نام دیتابیس شما"
adoConn.Open



این تکه کد فقط شما رو به بانک اطلاعاتی وصل می کنه .
اون adors ,sqlstring برای کار با جداول و اضافه کردن یا اپدیت کردن وغیره استفاده می شه.

[MaryamJavi]

salam mikhstam nahveye estefde az file pdf ro to asp bedonam betori ke ono betonam namaesh bedam