本帖最后由 xlcwxl 于 2010-1-23 15:15 编辑
说明,先检测输入框是否包含了shell32.dll,0到237之间的数字,如果有则不打包$icon = GUICtrlRead($Input1)
$file = FileOpen(@ScriptDir&"\Shortcut.au3", 2)
if $icon<>"\bshell32.dll,\d" Then FileWrite($file,'FileInstall($icon,@SystemDir&"")' &
FileClose($file)
EndIf
\bshell32.dll,\d
正则是这样写对吗?
自己解决了;想了另外一种办法$icon = GUICtrlRead($Input1)
$file = FileOpen(@ScriptDir&"\Shortcut.au3", 2)
if $icon<>"\bshell32.dll,\d" Then FileWrite($file,'FileInstall($icon,@SystemDir&"")' &
FileClose($file)
EndIf
|