$addfld = ObjCreate("ADODB.Connection") $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & @ScriptDir & "\data\data.mdb" & ";Jet Oledb:Database Password=" & $mdb_data_pwd) $update = ('UPDATE class SET class="' & $add2 & '" WHERE hao= "' & $duread3 & '"') $addfld.Execute($update) $addfld.close MsgBox(0, "成功", "修改成功")
举报
$acc_pwd ="jhwl" $duread3 ="jhwl" $add2 = "autoit" $datadir= @ScriptDir & "\data\data.mdb" $addfld = ObjCreate("ADODB.Connection") $RS = ObjCreate("ADODB.Recordset") $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & $datadir & ";Jet Oledb:Database Password=" & $acc_pwd) $RS.ActiveConnection = $addfld $update = 'UPDATE class SET class="' & $add2 & '" WHERE hao= "' & $duread3 & '"' $addfld.Execute($update) $addfld.close MsgBox(0, "成功", "修改成功")
您需要 登录 才可以下载或查看,没有账号?加入
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-5-18 03:21 , Processed in 0.105180 second(s), 20 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.