Set Sh = CreateObject("WScript.Shell")
strCommand = """" & Sh.CurrentDirectory & "\adb.exe"" install ""%1"""
Sh.RegWrite "HKEY_CLASSES_ROOT\.apk\shell\Install\command\", strCommand