The square bullet is Windows way of showing a character that it cannot show. So chr$(2) - STX will show the same as chr$(3) ETX
--- In [email protected], "justinanning" <jus...@...> wrote: > > Hi Roland, > If you log serial data in hyperterm using the wrong baud you sometimes see > the symbol you refer to...Try different baud? > > When I was recently starting with nsbasic I had trouble with figuring out the > .Read, but have had no trouble with the .OnRead function. Try this.... > > objPort.BaudRate = 4800 > objPort.ComPort = 2 > objPort.Timeout = 2000 > objPort.Enabled = True > objPort.NoEvents = False > objPort.EndTrigger = vbCR 'Note Some equipment only has CR not CRLF > > Sub objPort_OnRead(Str) > On Error RESUME NEXT > If IsNull(str) Then > Print "port timeout (no end trigger)" > Else > str = Replace(str, Chr(10), "") 'clean string from the left over LF if > using mixed CRLF terminators > str = Replace(str, Chr(13), "") 'may as well clean string of any extra > CR's just in case > Print str > End If > If Err Then > MsgBox "Runtime Error: " & Err.Number & " " & Err.Description > Err.Clear > End If > End Sub > > If your data always ends in CRLF then use this as the endtrigger so you dont > have to worry about doing a replace function on a null string and can cut the > sub down to... > > Sub objPort_OnRead(Str) > print str > end sub > > If collecting loads of data fast always use 115200 baud if you can, when > parsing use instr function to find the header then pass the string off to a > function to perform more intensive parsing and calculations on the data while > the next string comes in. (I think thats how it works, it gave me better > results anyway) > > Cheers, > Justin > > --- In [email protected], Rolando Mendoza <roland.mendoza@> wrote: > > > > Hi George, > > > > I tried a different port number, and your suggestion worked. With the > > sample serial port application in the samples\serialtools folder, I was > > able to open a port, and write a string. I know the objPort.write statement > > worked because it reflected the number of characters written. > > > > However, the statement: > > str = objPort.Read(0, 5000) kept returning a square bullet character. > > > > Any reason why the serial port is not reading the string thrown at it? > > > > > > Warmest Regards, > > > > Roland > > > > > > > > --- On Mon, 8/10/09, George Henne <gh@> wrote: > > > > From: George Henne <gh@> > > Subject: Re: [nsbasic-ce] Cannot open the Comm Port > > To: "[email protected]" <[email protected]> > > Date: Monday, 10 August, 2009, 6:31 PM > > > > > > > > > > > > > > > > > > > > > > > > > > Could the comPort be a different number? > > > > > > > > > > > > > > > > > > >Hi, > > > > > > > > > >I downloaded the Franson Serial Tools to add printer support to my WinCE > > > > >application, which runs on a Palm Treo 750. Using the serial number > > > > >provided by NSBasic, I proceded to code as follows: > > > > > > > > > >AddObject "serialce.port. 1","objPort" > > > > >AddObject "serialce.license" ,"objlicense" > > > > > > > > > >objLicense. LicenseKey = "licence key provided by NSBasic" > > > > > > > > > >objPort.ComPort = 8 > > > > >objPort.Enabled = True > > > > > > > > > >PrintString = "Hello World" > > > > >objPort.Write PrintString > > > > > > > > > >My problem is, whenever I execute the program on the PDA unit, the > > > > >application gives a VBScript error which says that it cannot open the > > > > >communication port despite installing the Franson runtime on the Treo. > > > > > > > > > >Please help! Any assistance provided to point me in the right direction > > > > >will be greatly appreciated. Thank you. > > > > > > > > > > > > > > >Roland > > > > > > > > > >How can I tell if my jewelry is real silver? > > > > >Find Out on Yahoo! Answers > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > New Email names for you! > > Get the Email name you've always wanted on the new @ymail and > > @rocketmail. > > Hurry before someone else does! > > http://mail.promotions.yahoo.com/newdomains/ph/ > > > --~--~---------~--~----~------------~-------~--~----~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~----------~----~----~----~------~----~------~--~---
