|
-
Apr 16th, 2000, 01:24 AM
#1
Thread Starter
Registered User
Hey...
You know, If I have a file named "Lior.TXT" and its size is 1MB, to paste all the file into a string using the input function takes 8 seconds!!! (on my P500).
I used this code:
Code:
Dim Buffer As String
Open "C:\LIOR.TXT" For Binary As #1
Buffer = Input(LOF(1), #1)
Close
If LIOR.TXT size is 1MB, 8 seconds are requierd to finish the program!
If its 2MB, 16 seconds Are requierd! (And so on..)
Any Ideas So It Wont Take That Long?
-
Apr 16th, 2000, 02:11 AM
#2
transcendental analytic
Use  
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
-
Apr 16th, 2000, 02:32 AM
#3
Thread Starter
Registered User
Still doesnt work...
Man...thanks for trying to help,
But when I declare Buffer as String and replace the line:
Code:
Buffer=Input(LOF(1),#1)
with this piece of code:
The Buffer just gets nothing, I mean it gets "".
Any Idead How To Use The Get Statement Correctly To Load All Of The File Opened In Binary Mode Into A String?
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|
Reply With Quote