mroberts
February 22nd, 1999, 01:27 PM
Greetings.
I wrote this file open Dialog in VB 4, and it did work, however it seems to have Broke, and i was wondering what went wrong??? maybe someone can help.
this code did not break until i upgraded to VB 5.0. now i get the Error Method or data member not found.
i dont want to have to rewrite my app in VB 5.0 from scratch, can someone help direct me in the correct path... thanks.
Sub FOpenProc()
Dim RetVal
On Error Resume Next
Dim OpenFileName As String
frmMDI.CMDialog1.Filename = ""
frmMDI.CMDialog1.ShowOpen
If Err 32755 Then ' User chose Cancel.
OpenFileName = frmMDI.CMDialog1.Filename
' If the file is larger than 65K, it can't
' be opened, so cancel the operation.
If FileLen(OpenFileName) > 65000 Then
MsgBox "The file is too large to open."
Exit Sub
it is this line : frmMDI.CMDialog1.Filename = "" in the code that is causing the problem,,,, according to VB. but it may be anywhere in VB. this is the file, open box. nothing spectaculer here. im just at a loss.
I wrote this file open Dialog in VB 4, and it did work, however it seems to have Broke, and i was wondering what went wrong??? maybe someone can help.
this code did not break until i upgraded to VB 5.0. now i get the Error Method or data member not found.
i dont want to have to rewrite my app in VB 5.0 from scratch, can someone help direct me in the correct path... thanks.
Sub FOpenProc()
Dim RetVal
On Error Resume Next
Dim OpenFileName As String
frmMDI.CMDialog1.Filename = ""
frmMDI.CMDialog1.ShowOpen
If Err 32755 Then ' User chose Cancel.
OpenFileName = frmMDI.CMDialog1.Filename
' If the file is larger than 65K, it can't
' be opened, so cancel the operation.
If FileLen(OpenFileName) > 65000 Then
MsgBox "The file is too large to open."
Exit Sub
it is this line : frmMDI.CMDialog1.Filename = "" in the code that is causing the problem,,,, according to VB. but it may be anywhere in VB. this is the file, open box. nothing spectaculer here. im just at a loss.