SQL и переменные

[Boss IT]

Добрый день:

Код: Выделить всё

Adodc1.CommandType = adCmdText
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Boss IT\Рабочий стол\Serv\Registr.mdb;Persist Security Info=False"
Adodc1.CursorType = adOpenDynamic
Adodc1.RecordSource = "INSERT INTO Registration VALUES (name, 'user', telefon, 4)"
Adodc1.Refresh

Вообщем такой вопрос: можно ли вставлять в sql запрос переменные? т.е. мне надо чтобы:

Код: Выделить всё

Adodc1.RecordSource = "INSERT INTO Registration VALUES (name, 'user', telefon, 4)"

//name и telefon - переменные

он вставлял значение переменных, а не само имя переменной.

Как сделать правильно?

[VVitafresh]

Код: Выделить всё

Adodc1.RecordSource = "INSERT INTO Registration VALUES (name, 'user', telefon, 4)"

//name и telefon - переменные

он вставлял значение переменных, а не само имя переменной.

Как сделать правильно?

Код: Выделить всё


Adodc1.RecordSource = "INSERT INTO Registration VALUES (" & name & ", 'user', " & telefon & ", 4)"


[Boss IT]

Код: Выделить всё

Adodc1.RecordSource = "INSERT INTO Registration VALUES (" & name & ", 'user', " & telefon & ", 4)"

Adodc1.RecordSource = "INSERT INTO Registration VALUES ('" & name & "', 'user', '" & telefon & "', 4)"

Кавычки забыл.... А так все правильно, спасибо.

Еще вопрос, почему когда я вставляю данные он пишет:
"Операция не допускается, если объект закрыт"?
А сам добавляет... потом ошибку выводит...

Как исправить?

[VDeltsov]

Тут наверное проще написить так:


Dim oCn as ADODB.Connection

oCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Boss IT\Рабочий стол\Serv\Registr.mdb;Persist Security Info=False"

oCn.open

oCn.Execute = "INSERT INTO Registration VALUES (" & name & ", 'user', " & telefon & ", 4)"

oCn.close