You are not logged in.

Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.

denizunlu

Beginner

  • "denizunlu" is male
  • "denizunlu" started this thread

Posts: 18

Date of registration: Dec 10th 2011

Location: Istanbul

Occupation: Developer

  • Send private message

1

Saturday, February 23rd 2013, 12:50pm

Winsock Control Doesnt Connect When Run in Browser...

Hi Everyone,

Im trying to create an applet with Jabaco which uses Winsock control. The applet runs fine in code environment but when I compile it as a project and run the HTML file Winsock control doesnot connect to the webservice. What could be the cause for that? Any restrictions by browser maybe?

Thanks in advance,

denizunlu

Dim stConn As String

Public Sub Command1_Click()

Dim stParam As String
stParam="s=MSFT&e=%2ecsv&f=sl1d1t1c1ohgv"
stConn="POST /d/quotes.csv HTTP/1.0" & vbCrLf
stConn=stConn & "Host: download.finance.yahoo.com" & vbCrLf
stConn=stConn & "Content-Type: application/x-www-form-urlencoded" & vbCrLf
stConn=stConn & "Content-Length: " & Len(stParam) & vbCrLf & vbCrLf
stConn=stConn & stParam
MsgBox wsc.State

Applet1.wsc.Connect "download.finance.yahoo.com",80

'wsc.Connect "http://finance.yahoo.com/rss/headline?s=yhoo,msft,tivo

End Sub

Public Sub wsc_Connect()

applet1.wsc.SendData stconn
End Sub

Public Sub wsc_DataArrival(bytesTotal As Long)
'Debug.Print Applet1.wsc.GetData
MsgBox Applet1.wsc.GetData
End Sub

Public Sub Applet_Initialize()

End Sub

Rate this thread
WoltLab Burning Board