菜刀数据库去密码脚本

代码如下:

Set args = WScript.Argumentsif args.count<>1 then msgbox "need file":wscript.quitSet conn =CreateObject("ADODB.Connection")pwd="密"&chr(13)&chr(9)&chr(10)&"码"&chr(2)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&";"conn.open connstrconn.execute("ALTER DATABASE Password [123456] ["&pwd&"]")conn.closemsgbox "done"

保存为去密码.vbs即可,将数据库直接托上去就可去除密码