General information
Category:
Coding, syntax & commands
Hi,
When I try to open the PDF file using this code... I receive the following error: Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
How else would I open a PDF file using VB?
Any ideas?
Thanks a bunch.
Alvin
Dim st As New ADODB.Stream
Dim strTemp As String
strTemp = App.path & "\"
st.Type = adTypeBinary
st.Open
st.Write rs.Fields("Image").Value
st.SaveToFile "\\Network\general\Order" + rs.Fields("ImageName").Value, adSaveCreateOverWrite
'frmCTop.Img.Visible = True
'frmCTop.Img.Picture = LoadPicture("\\tas2\general\Order Counter Top Image" + rs.Fields("ImageName").Value)
st.Close
'ERROR GENERATED ON NEXT LINE
st.Open "\\Network\general\Order" + rs.Fields("ImageName").Value, adModeReadWrite, adOpenStreamAsync
Kill ("\\Network\general\Order" + rs.Fields("ImageName").Value)
st.Close
Set st = Nothing
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only