分類  >  Web前端 >

!透過網頁啟動程序的意義和實現方法!

tags:    時間:2013-12-10 15:18:53
!!!通過網頁啟動程序的意義和實現方法!!!
目標:通過網頁啟動任意程序。(已實現,完善中)
作用:豐富多彩的多媒體表現形式,靈活的數據生成方式。還能做html遊戲菜單
實現:關鍵1:如何繞過ie的exe安全鎖
    關鍵2:如何在本地不通過asp動態生成網頁。
註冊表部分:(導入后,任何chinanewxp://開頭的網頁地址都會啟動c:\tools\chinanewxp.exe
            並將參數傳遞給它)


Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\myself]
@="URL: chinanewxp Protocol"
"URL Protocol"=""

[HKEY_CLASSES_ROOT\chinanewxp\DefaultIcon]
@="c:\\tools\\chinanewxp.exe"
"OldIcon"="c:\\tools\\chinanewxp.exe"

[HKEY_CLASSES_ROOT\chinanewxp\shell]
@="open"

[HKEY_CLASSES_ROOT\chinanewxp\shell\open]
@="open"

[HKEY_CLASSES_ROOT\chinanewxp\shell\open\command]
@="\"c:\\tools\\chinanewxp.exe\" \"%1\""


程序部分(au3): 原型模塊,不完整!!!

_myrun($cmdline[1])

;函數功能:運行程序
Func _myrun($progname)
local $filedir,$szDrive, $szDir, $szFName, $szExt
If Not FileExists($progname) then
   MsgBox(48, "警告", "沒有找到文件" & $progname & ",請與管理員聯繫!")
   Return 0
Endif
_PathSplit($progname, $szDrive, $szDir, $szFName, $szExt)
$filedir= $szDrive & $szDir
If Not FileExists($filedir) then
   MsgBox(48, "警告", "沒有找到目錄" & $filedir & ",請與管理員聯繫!")
   Return 0
Endif
ShellExecute($progname,"",$filedir)
Return 1
EndFunc

推薦閱讀文章

Bookmark the permalink ,來源:互聯網