私はこれを理解するためにドキュメントやフォーラムに何時間も費やしました。
コードはエラーなしで実行されますが、バッチスクリプトは実行されません。
私は読者を惜しまなかった#include<*>
部分は、非常に冗長であるためです。
oToClip()
Func oToClip()
Local $sleep = 250
Sleep($sleep)
Local $sFilePath = "%userprofile%\oToClip.bat"
Sleep($sleep)
Local $hFileOpen = FileOpen($sFilePath, $FO_APPEND + $FO_CREATEPATH)
If $hFileOpen = -1 Then
MsgBox($MB_SYSTEMMODAL, "", "An error occurred when opening the file.")
EndIf
Sleep($sleep)
FileWriteLine($hFileOpen, "type %userprofile%\o.txt | clip")
Sleep($sleep)
FileClose($hFileOpen)
Sleep($sleep)
RunWait(@ComSpec & " /c " & $sFilePath)
EndFunc ;==>oToClip
' "command" | clip'
を使用するとどうなりますか?
'タイプ 「」%userprofile%\ o.txt "| clip'
oToClip()
Func oToClip()
Local $sleep = 250
Sleep($sleep)
Local $sFilePath = "%userprofile%\oToClip.bat"
Sleep($sleep)
Local $hFileOpen = FileOpen($sFilePath, $FO_APPEND + $FO_CREATEPATH)
If $hFileOpen = -1 Then
MsgBox($MB_SYSTEMMODAL, "", "An error occurred when opening the file.")
EndIf
Sleep($sleep)
FileWriteLine($hFileOpen, 'type "%userprofile%\o.txt"|clip')
Sleep($sleep)
FileClose($hFileOpen)
Sleep($sleep)
RunWait(@ComSpec & " /c " & $sFilePath)
EndFunc ;==>oToClip