How read data from binary (test.cic) file

Dear allI have a binary file in (test.cic)cic format, which contain a signature code like "“e!:$$ÿÿ!Q$Dynamic!OSignature!OTemplate.!OAll …” i need to get this signature string from this file and convert it to signature format in my lotus form object.

But every time I open the file and use ‘Get’ method to get the signature string the error will show as “Input pass end of file”

Has any one pls help I need it asap below is my code please advise it is ok in R5

Dim handle as variant

dim ws as new notesuiworkspace

dim uidoc as notesuidocument

set uidoc = ws.currentdocument

Dim iFileLength As Integer

Dim sBuf As String

iFileLength = FileLen(“C:\test.cic”)

sBuf = String$(iFileLength, " ")

Open “C:\test.cic” For Binary Access Read As #1

Get #1, , sBuf '<>>

Close #1

Set handle = uidoc.getobject(“dsvSigCheck”)

handle.Template = sBuf