Проблема с MSSQL

У меня проблема с базами MSSQL
[sql]INSERT INTO MEMB_INFO (memb_guid, memb___id, memb__pwd, memb_name, sno__numb, mail_addr, mail_chek, bloc_code, ctl1_code, vip_free, member, ZY, jf, rcb, vip, Expired, sms_t, last_ip, last_s, bloc_date, SCFIsVip, SCFVipMoney, SCFVipDays, SCFWareVipCount)
VALUES (:vcustid, 'Логин', 'Пароль', 'User', '123456789012345678', '[email protected]', '0', '0', '1', '0', '0', '0', '0', '0', '0', 'Дата', '0', '0', '0', '0', 'Дата', '0', '0', '0', '0');[/sql]

При попытке выполнения этого кода в Visual Basic (Ну конечно я все делал для правильной работы)
Ответ от SQL был таким:
Line 2: Incorrect syntax near ':'.

Тесть ругается на двоеточие, но двоеточие нужна для работы счетчика
кто знает что делать?

после VALUES( надо не двоеточие ставить, а скорее всего переменную и выносить её за строку.

Пример можно, я в SQL никто =(
Мне нужно сделать очередность
Ну там
1 строка ID 30
2 строка ID 31 и.т.д...

Не пойму при чём здесь Visual Basic, подробнее опиши что хочешь сделать, и полный код иначе понять сложно.

Хочу сделать регистрацию в программе
TextBox2.Text - Логин
TextBox3.Text - Пароль
TextBox5.Text & "@" & TextBox6.Text - Майл
База - MyBase

Вот код:

代码:

        Dim DBTableName As String = "MEMB_INFO"
Dim cn As New OleDb.OleDbConnection("Data Source=ИП_СКРЫТ,1433;Provider=SQLOLEDB;Initial Catalog=MyBase;User ID=sa;Password=ПАРОЛЬ_СКРЫТ;")
Dim cmd As New OleDb.OleDbCommand("INSERT INTO MEMB_INFO (memb_guid, memb___id, memb__pwd, memb_name, sno__numb, mail_addr, mail_chek, bloc_code, ctl1_code, vip_free, member, ZY, jf, rcb, vip, Expired, sms_t, last_ip, last_s, bloc_date, SCFIsVip, SCFVipMoney, SCFVipDays, SCFWareVipCount)" & vbNewLine & "VALUES (:vcustid, '" & TextBox2.Text & "', '" & TextBox3.Text & "', 'User', '123456789012345678', '" & TextBox5.Text & "@" & TextBox6.Text & "', '0', '0', '1', '0', '0', '0', '0', '0', '0', '" & DateString & " " & TimeOfDay & "', '0', '0', '0', '" & DateString & " " & TimeOfDay & "', '0', '0', '0', '0');", cn)
Dim da As New OleDb.OleDbDataAdapter(cmd)
Dim tbl As New DataTable
da.Fill(tbl)
tbl.Dispose()
da.Dispose()
cmd.Dispose()
cn.Dispose()

Ну где ошибка в запросе понятно, :vcustid, вместо этого должна быть или переменная или значение. Если в этом поле нужен счётчик, то сделать всё можно немного проще, тип поля поставить autoincrement и его не добавлять вообще, т.е. запрос станет таким:

代码:

INSERT INTO MEMB_INFO (memb___id, memb__pwd, memb_name, sno__numb, mail_addr, mail_chek, bloc_code, ctl1_code, vip_free, member, ZY, jf, rcb, vip, Expired, sms_t, last_ip, last_s, bloc_date, SCFIsVip, SCFVipMoney, SCFVipDays, SCFWareVipCount)" & vbNewLine & "VALUES ('" & TextBox2.Text & "', '" & TextBox3.Text & "', 'User', '123456789012345678', '" & TextBox5.Text & "@" & TextBox6.Text & "', '0', '0', '1', '0', '0', '0', '0', '0', '0', '" & DateString & " " & TimeOfDay & "', '0', '0', '0', '" & DateString & " " & TimeOfDay & "', '0', '0', '0', '0');

Спасибо, помогло, все я написал свой лаунчер с регистрацией =)