11-14-2003, 02:47 AM
Pages: 1 2
11-14-2003, 05:12 PM
Meg, its great you got it working =).
Ps.: Please dont double post. Use the 'Edit' option to append your message =)
Ps.: Please dont double post. Use the 'Edit' option to append your message =)
11-14-2003, 05:15 PM
Great Meg! Glad to hear you found out how to do it.
But, now imitating oracle... TBBQ: BAD. Because you posted Meg couldn't remove his message! lol
But, now imitating oracle... TBBQ: BAD. Because you posted Meg couldn't remove his message! lol
11-14-2003, 06:14 PM
Sorry about the double-post. I'll try to remember it's a no-no in the future.
This is the code I used (in VB 6.0):
It was running behind a plain form with a MsComm object added to it, and the MsComm Control 6.0 component checked off...
*peace*
Meg.
This is the code I used (in VB 6.0):
Code:
Private Sub Form_Load()
MSComm1.RThreshold = 1
MSComm1.InputLen = 1
MSComm1.Settings = "9600,N,8,1"
MSComm1.CommPort = 1
MSComm1.PortOpen = True
End Sub
Private Sub MSComm1_OnComm()
Dim sData As String * 1
If MSComm1.CommEvent = comEvReceive Then
sData = MSComm1.Input
SendKeys sData$
End If
End Sub
Private Sub Form_Unload(Cancel As Integer)
MSComm1.PortOpen = False
End Sub
It was running behind a plain form with a MsComm object added to it, and the MsComm Control 6.0 component checked off...
*peace*
Meg.
11-14-2003, 07:15 PM
Quote:Great Meg! Glad to hear you found out how to do it.
But, now imitating oracle... TBBQ: BAD. Because you posted Meg couldn't remove his message! lol
Neo I was just informing her. And please dont post off topic content otherwise this thread will be locked. OOps! There I go again :lol:
Pages: 1 2