|
Join the 80,000 other DTN customers who enjoy the fastest, most reliable data available. There is no better value than DTN!
(Move your cursor to this area to pause scrolling)
"Can I get another account from you? I am tired of ******* going down so often" - Comment from George
"I noticed that ******* quotes locked up shortly after the interest rate announcement yesterday while yours stayed stable." - Comment from Ron in Utah
"If you want customer service that answers the phone, your best bet is IQFeed. I cannot stop praising them or their technical support. They are always there for you, and they are quick. I have used ****** too but the best value is IQFeed." - Comment from Public Forum
"You have an excellent feed. Very few spikes for Spot Forex." - Comment from Public Forum Post
"Thank God for your Data Feed as the only Zippers I see are on my pants (LOL), and no more 200 pip spikes to mess up charts." - Comment from Spiro via Email
"I've never had DTN go out on me since switching. ******* would go down a couple times every month when I was using them." - Comment from Bryce in AL.
"Just a thank you for the very helpful and prompt assistance and services. You provided me with noticeably superior service in my setup compared to a couple of other options I had looked at." - Comment from John
"I have to tell you though that using the IQFeed API is about the easiest and cleanest I have seen for some time." - Comment from Jim
"I'm satisfied with IQFeed. It's the most reliable and fastest quote feed I have ever used. Although I'm a resident in China, it's still very fast!" - Comment from Xiaofei
"Previously I was using *******. IQFeed is WAY more economical, and for my charting needs is just as good, if not better." - Comment from Public Forum Post
|
|
|
|
Joined: |
Aug 18, 2004 01:33 PM |
Last Post: |
Sep 3, 2004 09:17 AM |
Last Visit: |
Sep 9, 2004 09:28 AM |
Website: |
|
Location: |
|
Occupation: |
|
Interests: |
|
Avatar: |
|
|
|
gklangreck has contributed to 3 posts out of 21196 total posts
(0.01%) in 7,214 days (0.00 posts per day).
20 Most recent posts:
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
OK I see now that I should be using IQFeedY, but I don't see any examples for VB .NET. I tried the AX control, but it would shutdown my program right after it loged in. I'm currently trying to use the Com direction from reading other problems in this forum, but still having problems with tham. Does anyone have a simple watch symbol program in VB .NET that they could send me.
Thanks...
I'm trying to develop a VB .NET program receiving up to the second stock quotes. I've tryed this simple test program to figure out what the problem is and it exits after less than 5 min without a reason. Can anyone help, please. Here is the code for the form.
Private s1 As String = "KLAC" Private s2 As String = "NVLS"
Private Sub btnGo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGo.Click IQFeed.WatchSymbol(s1) IQFeed.WatchSymbol(s2) End Sub
Private Sub IQFeed_ReceiveMessage(ByVal sender As Object, ByVal e As AxIQFEEDXLib._IIQFeedXEvents_ReceiveMessageEvent) Handles IQFeed.ReceiveMessage If (e.message.Chars(0) = "Q") Then Dim message As String() = Split(e.message, ",") If message(1) = s1 Then lstOutput.Items.Add("S1 " & message(3)) ElseIf message(1) = s2 Then lstOutput.Items.Add("S2 " & message(3)) End If End If End Sub
See very simple program, why does it exit...
|
|