Vbs запрос к MS SQL

Public Function GDAIS(strCPU)         Const adOpenStatic = 3         Const adLockOptimistic = 3                  Set objConnection = CreateObject("ADODB.Connection")         Set objRecordSet = CreateObject("ADODB.Recordset")          '         objConnection.Open _ '              "Provider=SQLOLEDB;Data Source=MeServerName;" & _ '                 "Persist Security Info=True;Initial Catalog=LANDesk;" & _ '                      "User ID=XXX;Password=XXXXX;"         objConnection.Open _             "Provider... read more