gklangreck
-Interested User-
Posts: 3
Joined: Aug 18, 2004
|
Posted: Sep 3, 2004 09:17 AM
Msg. 1 of 1
Can't get simple VB .NET program to work with IQFeedY. I draged the AX control to the form and used it that way. I also tried using the COM way and could not get anything to work. Can someone please help with this simple program...
Here is the code for the form...
Public Class Form1 Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim strName As String = "IQFEED_DEMO" Dim strVersion As String = "1" Dim strKey As String = "0.11111111" Try IQFeedY.RegisterClientApp(strName, strVersion, strKey) IQFeedY.SetAutoLogin("000000", "0000") Catch ex As Exception MessageBox.Show(ex.ToString) End Try End Sub
Private Sub btnGo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGo.Click IQFeedY.WatchSymbol("KLAC") End Sub
Private Sub IQFeedY_QuoteMessage(ByVal sender As Object, ByVal e As AxIQFEEDYLib._DIQFeedYEvents_QuoteMessageEvent) Handles IQFeedY.QuoteMessage lstOutput.Items.Add(e.strQuoteData) End Sub
Private Sub IQFeedY_IQConnectStatus(ByVal sender As Object, ByVal e As AxIQFEEDYLib._DIQFeedYEvents_IQConnectStatusEvent) Handles IQFeedY.IQConnectStatus lstOutput.Items.Add("Connection Code " & e.lStatus.ToString) End Sub End Class
|