求助有关sql
Dim $ServerIP = '127.0.0.1'Dim $ServerID = 'sa'
Dim $ServerPWD = 'sa'
Dim $ServerDatabase = 'ECardData'
$conn = ObjCreate("ADODB.Connection")
$RS = ObjCreate("ADODB.Recordset")
$conn.Open("driver={SQL Server};server=" & $ServerIP & ";uid=" & $ServerID & ";pwd=" & $ServerPWD & ";database=" & $ServerDatabase & "")
$RS.ActiveConnection = $conn
;----------------------------查询
Dim $hardware = "dbo.tAccount"
$RS.open("select sPassword from " & $hardware);这里就自由发挥了
MsgBox(0,"返回第一行数据",$RS.Fields(0).value)
http://hiphotos.baidu.com/%B6%C5%B7%E3%B9%A4%D7%F7%CA%D2/pic/item/71ec31f38a1ad954b17ec567.jpg 想做个东西,就是输入sinternalid 中的数据自动读取spassword中的数据
咋写啊
页:
[1]