Вопрос на самом деле легкий для знающих. Есть кусочек кода который обращается к базе данных. В исходнике переменной str1 (в последней строке) присваиавлась цифра, т.е. было написано str1 = "123". Я создал форму и хочу чтоб эта переменная бралась из Textbox1 ?? Когда я просто пишу str1=Textbox1.value , то код не работает. Подскажите чего дописать там надо бы? Пожалуйста..
Sub RunM()
Dim str1, str2, str3, ConStr, ZaprStr As String
' Создание объекта подключения.
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
' Создание объекта набора записей.
Dim records As ADODB.Recordset
Set records = New ADODB.Recordset
'Подключение к базе данных
ConStr = "Provider=SQLOLEDB; Data Source= 12365APP_1;Initial Catalog=BD;UID=u;PWD=u"
'Открытие подключения
conn.Open ConStr
'подаёшь номер в соответствии с тем что у нас в базе
str1 = TextBox1
Sub RunM()
Dim str1, str2, str3, ConStr, ZaprStr As String
' Создание объекта подключения.
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
' Создание объекта набора записей.
Dim records As ADODB.Recordset
Set records = New ADODB.Recordset
'Подключение к базе данных
ConStr = "Provider=SQLOLEDB; Data Source= 12365APP_1;Initial Catalog=BD;UID=u;PWD=u"
'Открытие подключения
conn.Open ConStr
'подаёшь номер в соответствии с тем что у нас в базе
str1 = TextBox1