[aprssig] VB6 file open for APRS

[Andrew Rich]

Awesome ...thanks !

This worked

> Open "C:\Program Files\Peak
> Systems\UI-View32\LOGS\20040421.TXT" For Input
> As #1
> Do While Not EOF(1)
> line Input #1, myserial
> List1.AddItem myserial
> Winsock1.SendData myserial & Chr$(13) & Chr$(10)
>
> Loop
>


-----Original Message-----
From: BDonnell at ar-northwest.com [mailto:BDonnell at ar-northwest.com]
Sent: Wednesday, 6 April 2005 11:05
To: vk4tec at tech-software.net; aprssig at lists.tapr.org
Subject: RE: [aprssig] VB6 file open for APRS


Hi Andrew,

I don't know if this is the same between VB5 and VB6, but take a look at the
"Line Input" operation instead of the "Input" operation.  I think that will
get you a line at a time instead of a field at a time.  In VB5 the help says
this:

The Line Input # statement reads from a file one character at a time until
it encounters a carriage return (Chr(13)) or carriage return-linefeed
(Chr(13) + Chr(10)) sequence. Carriage return-linefeed sequences are skipped
rather than appended to the character string.

73, Bob, KD7NM

> -----Original Message-----
> From: aprssig-bounces at lists.tapr.org
> [mailto:aprssig-bounces at lists.tapr.org]On Behalf Of Andrew Rich
> Sent: Tuesday, April 05, 2005 5:35 PM
> To: TAPR APRS Special Interest Group
> Subject: [aprssig] VB6 file open for APRS
>
>
> Anybody a guru on VB6 ?
>
> I am trying to open every log file in the LOGS directory of
> UI-VIEW and
> reply to port 1448 (UI-VIEW server)
>
> For some reason when I open the log file, VB6 thinks a COMMA is a
> deliminator.
>
> Ideas ?
>
> Private Sub Command4_Click()
>
> Open "C:\Program Files\Peak
> Systems\UI-View32\LOGS\20040421.TXT" For Input
> As #1
> Do While Not EOF(1)
> Input #1, myserial
> List1.AddItem myserial
> Winsock1.SendData myserial & Chr$(13) & Chr$(10)
>
> Loop
>
>
>
>
> _______________________________________________
> aprssig mailing list
> aprssig at lists.tapr.org
> https://lists.tapr.org/cgi-bin/mailman/listinfo/aprssig
>