去除中国菜刀数据库密码

小渣渣

去除中国菜刀数据库密码
1.将代码保存为 zhongguocaidao.vbs
2.将中国菜刀的数据库 拖到zhongguocaidao.vbs即可

1. Set args = Wscrip去掉t.Arguments
   
2. if args.count<>1 then msgbox "db.mdb":wscrip去掉t.quit
   
3. Set conn =CreateObject("ADODB.Connection")
   
4. pwd="密"&chr(13)&chr(9)&chr(10)&"码"&chr(2)
   
5. connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & args(0)&" ;Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;Jet OLEDB:Database Password="&pwd&";"
   
6. conn.open connstr
   
7. conn.execute("ALTER DATABASE Password [123456] ["&pwd&"]")
   
8. conn.close
   
9. msgbox "done"

复制代码