The method of removing the password of Chinese kitchen knife
Set args = WScript.Argumentsif args.count1 then msgbox "db.mdb": wscript.quitSet conn = CreateObject ("ADODB.Connection") pwd= "secret" & chr (13) & chr (9) & chr (10) & "Code" & 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 "
How to use: save to * .VBS format, execute.
