Code: Select all
<SL:root xmlns:SL="Smartlaunch">
<Command Name="SmartlaunchVersion" />
</SL:root>
any help would be apreciated since i'm desperate with thisone
Moderators: FourthWorld, heatherlaine, Klaus, kevinmiller, robinmiller
Code: Select all
<SL:root xmlns:SL="Smartlaunch">
<Command Name="SmartlaunchVersion" />
</SL:root>
Code: Select all
put "<SL:root xmlns:SL=""e&"Smartlaunch""e&">" into tQuery
put "<Command Name=""e&"SmartlaunchVersion""e&"/>" after tQuery
put "</SL:root>" after tQuery
Code: Select all
libURLSetCustomHTTPHeaders
Code: Select all
set the httpheaders to xxxx
Code: Select all
libURLSetCustomHTTPHeaders field "Header"
post tQuery to url "http://vsrvx3:18980/adxwsvc/services/CAdxSubProgramXml"
Code: Select all
Accept-Encoding: gzip,deflate
Content-Type: text/xml;charset=UTF-8
Content-Length: 1871
Host: vsrvx3:18980
Connection: Keep-Alive
User-Agent: Apache-HttpClient/4.1.1 (java 1.5)
Code: Select all
Accept: application/json, text/javascript, */*; q=0.01
Content-Type: application/json; charset=UTF-8
Cookie: session_id=69b6282312f2fe1f88cd403ed075db8f52c4ea57
Connection: keep-alive
Cache-Control: no-cache
Pragma: no-cache
Code: Select all
on mouseUp
open socket to theSocket -- theSocket = my socket
write XMLCommand to socket theSocket -- XMLCommand = the command var
read from socket theSocket until EOF
put it
end mouseUp
Code: Select all
set the HTTPProxy to "127.0.0.1:8888"
Code: Select all
on mouseUp
disable me
put "192.9.202.135:8192" into tSocket --- change IP and port number
open socket to tSocket with message connected
If the Result <> "" then
answer warning "Error : "&the Result
enable me
exit to top
end if
end mouseUp
on connected theSocket
write fld "xml"& return to socket theSocket --- put into a field your whole XML command, beware of the last char : return or something else ? What the server is waiting for ?
wait 5 ticks
read from socket theSocket for 4 chars with message "login1" ---it should read the first 4 chars of the server's answer and go to "login1" as a callback message.
end connected
on login1 theIP tMessage
close socket theIP
answer tMessage --- display the 4 characters received (if any)
enable me
end login1
on socketError theID, tDetail
answer warning "ERROR "&tDetail
close socket theID
end socketError