コメント |
http://winofsql.jp/wsf/ieSrcEditor.wsf
@DIV
<JOB>
<COMMENT>
************************************************************
WEB WSH 実行スケルトン
************************************************************
</COMMENT>
<COMMENT>
************************************************************
外部スクリプト定義
************************************************************
</COMMENT>
<SCRIPT
language="VBScript"
src="http://lightbox.in.coocan.jp/laylaClass.vbs">
</SCRIPT>
<SCRIPT language=VBScript>
' ***********************************************************
' 処理開始
' ***********************************************************
Call laylaFunctionTarget( "http://lightbox.in.coocan.jp/" )
Call laylaLoadFunction( "baseFunction.vbs" )
Call laylaLoadFunction( "wmiReg.vbs" )
Call laylaLoadFunction( "toolFunction.vbs" )
' **********************************************************
' エディタ選択
' **********************************************************
strValue = OpenFileName
if strValue = "" then
Wscript.Quit
end if
' **********************************************************
' レジストリ
' **********************************************************
strPath = "SOFTWARE\Microsoft\Internet Explorer\View Source Editor\Editor Name"
Call WMIRegCreateKey( HKEY_LOCAL_MACHINE, strPath )
strValue = Dd( strValue )
Call WMIRegSetStringValue( HKEY_LOCAL_MACHINE, strPath, Empty, strValue )
MsgOk( strValue & " を IE のソースエディタとして登録しました" )
</SCRIPT>
</JOB>
@END
|