Check this out (fast I/O + NT services)

[Paul282]

Couple of very good hints I've come across...

1). I saw a question posted here once from someone asking about quick ways to open large (xMB) text files quickly and the advice was (and I used to do this myself) a richtextbox control's loadfile method.

BUT THIS IS HEAPS FASTER.

Dim Bytes() As Byte
ReDim Bytes(FileLen("C:\test.txt"))

Open "C:\test.txt" For Binary As 1
Get #1, 1, Bytes
Close #1
Text1.Text = StrConv(Bytes, vbUnicode)

The byte array loads very quickly and is great for use in file IO as I'm sure you all know, but the second part is almos instant. I loaded a 2.5 mb text file to a textbox faster than notepad could under win2000 with a P-Pro compile. This is great (but might work a little different under '98/95 bucause VB works differently with unicode under those OS's) .


2). NT services from VB. There is a great activeX control out. doesn't require that rubbishy service-any stuff and worked great for me. properly compiled from C++ to handle NT's free thread events (properties for start, stop, pause, cont etc). I have the zip (about 200k) but I lost the URL. Email me if you ant it and I'll send it straight across [email protected]

[Clunietp]

NT Service OCX @ http://www.softbear.com/cpp/ntsvocx/