اشکال این دستور چی؟

[javadt]

من دارم با دستورات sql به بانک add می کنم با شی ADODB
اما توی بانک اضافه نمی شه و اروری هم نمی ده
از کد هایی که استفاده کردم گذاشتم تا ببینید مشکلش کجاست
با تشکر

Public conn As New ADODB.Connection
Public cmd As New ADODB.Command

Public Sub ConnectDb()
On Error GoTo E_R
If conn.State = 1 Then conn.Close
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;JET OLEDB:Database Password=1234;Data source =" & App.Path & "\db1.mdb"
Exit Sub
E_R: MsgBox Err.Description, vbCritical
End Sub

Private Sub Command1_Click()
On Error GoTo E_R
ConnectDb

cmd.ActiveConnection = conn
cmd.CommandType = adCmdText
cmd.CommandText = "Select * From tbl"
cmd.CommandText = "INSERT INTO tbl (`id`, `name`) VALUES ('text1', 'text2')"
cmd.Parameters.Refresh
MsgBox "ok"
Exit Sub

[kiasia]

سلام دوست عزیز

کد شما چند جا اشکال اساسی داشت!

اینم کد اصلاح شده:

[javadt]

با تشکر از شما دوست عزیز
آیا راهی هست که از این دستورات تو در تو که برای پروژه های بزرگ مشکل ایجاد می کنه استفاده نکنیم
با تشکر

INSERT INTO tbl (id,name) VALUES ('" + Text1 + "','" + Text2 + "')

[kiasia]

با تشکر از شما دوست عزیز
آیا راهی هست که از این دستورات تو در تو که برای پروژه های بزرگ مشکل ایجاد می کنه استفاده نکنیم
با تشکر

INSERT INTO tbl (id,name) VALUES ('" + Text1 + "','" + Text2 + "')

سلام دوست عزیز
اگه میخوای از دستورات SQL استفاده کنید،همین یک روش وجود داره واسه اضافه کردن رکورد به جدول.
ولی دستور سختی نیست!ببین شما همیشه باید دستورات SQL رو به صورت رشته به برنامه بدید،به خاطر همینم هستش که من کاما و پرایم رو به صورت رشته به دستورات اضافه کردم.

موفق باشید.

[reza_mn]

بجای استفاده از کامند از رکوردست استفاده کنید:
بدین ترتیب میتوانید اینگونه در هنگام افزودن رکورد عمل نمایید:



Private ADORecPrg As New ADODB.Recordset
With ADORecPrg
.Open "select * from Telecast", ADOConn, adOpenDynamic, dLockPessimistic
.AddNew
.Fields("name") = cmbPrgName.Text
.Fields("Family") = cmbPrgFamily.Text
.
.
.
.Update
end with

[اوبالیت به بو]

با تشکر از شما دوست عزیز
آیا راهی هست که از این دستورات تو در تو که برای پروژه های بزرگ مشکل ایجاد می کنه استفاده نکنیم
با تشکر

INSERT INTO tbl (id,name) VALUES ('" + Text1 + "','" + Text2 + "')
به اين تايپيك بريد:

http://barnamenevis.org/forum/showthread.php?t=147578&highlight=%D9%BE%D8%A7%D9%8A%D8%A7%D9%86
قسمت كار با Parameter ها