02/12/29 13:42 f25nDPTG.net
property CRLF : (ASCII character 13) & (ASCII character 10)
set cut to "POST /mconn HTTP/1.1
Host: 192.168.0.1
Accept: */*
Accept-Language: ja
onnection: Keep-Alive
Referer: URLﾘﾝｸ(192.168.0.1)
User-Agent: Mozilla/4.0 (compatible; MSIE 5.0; Mac_PowerPC)
UA-OS: MacOS
UA-CPU: PPC
Content-type: application/x-www-form-urlencoded
Extension: Security/Remote-Passphrase
Content-length: 35
PP=1&LOGIN=ON&DISCONNECT=%90%D8%92f"
set AppleScript's text item delimiters to return
set cut to text items of cut
set AppleScript's text item delimiters to CRLF
set cut to cut as string
tell application "Internet Explorer"
set rf to item 1 of (GetWindowInfo (item 1 of (ListWindows)))
end tell