Click here to Skip to main content
12,069,857 members (65,665 online)
Rate this:
 
Please Sign up or sign in to vote.
See more: VB6 VB VB.NET
I have some pcl documents with information embeded in the first couple of lines. These need to be removed bfore converting the pcl document to a tiff document to be imaged.

In vb6 I used:

Put #outFile, , Replace(StrConv(InputB(LOF(fileNum), fileNum), vbUnicode), sString, "", 1, 1, vbBinaryCompare)

I am opening the file binary converting to a string and replacing the string, basically deltting the string and saving it to a new file. I have tried to code this in vb.net, but have not been able to make it work.
Posted 25-May-12 8:33am
Edited 25-May-12 8:36am
Maciej Los213.8K
v2
Comments
SAKryukov 25-May-12 14:44pm
   
Who do you think MSDN help is written for?
--SA
losmac 29-May-12 13:03pm
   
Good question!

1 solution

Rate this: bad
 
good
Please Sign up or sign in to vote.

Solution 1

I found a way to accomplish what I needed.

FileOpen(5, "C:\Temp\TempImg.pcl", OpenMode.Output)
Do Until EOF(fileNum)
    sString1 = LineInput(fileNum)
    position = InStr(sString1, "INDEXX:")
    If position > 0 Then
        sString = sString1
        sString1 = ""
    End If
    Print(5, sString1 & vbCrLf)
Loop
FileClose(5)
FileClose(fileNum)
 
imageFile = My.Computer.FileSystem.ReadAllBytes"C:\Temp\TempImg.pcl")
My.Computer.FileSystem.WriteAllBytes(TempDir + sFileName, imageFile, False)
  Permalink  
v2
Comments
Kenneth Haugland 16-Jul-12 12:20pm
   
This looks a lot like VB6 if im not mistaken?

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month


Advertise | Privacy | Mobile
Web04 | 2.8.160208.1 | Last Updated 29 May 2012
Copyright © CodeProject, 1999-2016
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100