Merge pull request #631 from cxd4/whitespace

whitespace
This commit is contained in:
zilmar 2015-09-26 20:48:33 +10:00
commit 074e735ccc
1 changed files with 23 additions and 23 deletions

View File

@ -45,7 +45,7 @@ Sub Navigate(IE, url)
End Sub
Sub ValidateLoggedIn(IE)
WScript.StdOut.WriteLine "ValidateLoggedIn start"
WScript.StdOut.WriteLine "ValidateLoggedIn start"
Navigate IE, "http://forum.pj64-emu.com/"
Wait IE
@ -407,10 +407,10 @@ Function Stream_StringToBinary(Text, CharSet)
End Function
Function ReadBinaryFile(path)
Const adTypeText = 2
Const adTypeBinary = 1
Const adTypeText = 2
Const adTypeBinary = 1
dim inStream
dim inStream
dim myByte,myByteValue,myCharacter
set inStream=WScript.CreateObject("ADODB.Stream")