Information générale
Catégorie:
Codage, syntaxe et commandes
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
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement