D
Didymus
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
Hi All,
When I run my app in Debug, it works great.
When I deploy it, and then run the app from the start menu, it works
great... except when I click on Help in the Help menu. It should open
a form and display the contents of the help.txt file. I get an error
message:
...Cannot find a part of the path "D:\Program Files\App
Folder\Resources\Help.txt"...
When I click continue on the error message window, the Help form
displays but without the contents of the Help.txt file.
Here is the frmHelp_Load code:
Private Sub frmHelp_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim AllText, LineOfText As String
' Open the Help.rtf file and load it into rtbHelp.
FileOpen(1, "...\Resources\Help.txt", OpenMode.Input)
Do Until EOF(1)
LineOfText = LineInput(1)
AllText = AllText & LineOfText & vbCrLf
Loop
rtbHelp.Text = AllText
FileClose(1)
End Sub
Like I said... the app works great when run in debug mode...
Thanks in advance,
Gary
-----BEGIN PGP SIGNATURE-----
Version: PGPfreeware 6.5.8 for non-commercial use <http://www.pgp.com>
iQA/AwUBQArvoT8KnwrkurVSEQK+zQCg1x2quJSUCo66wrZu87hN/yOYThYAn2Ee
Z+FcSIpXaeFKjIQff3Hys9T0
=GxNM
-----END PGP SIGNATURE-----
Hash: SHA1
Hi All,
When I run my app in Debug, it works great.
When I deploy it, and then run the app from the start menu, it works
great... except when I click on Help in the Help menu. It should open
a form and display the contents of the help.txt file. I get an error
message:
...Cannot find a part of the path "D:\Program Files\App
Folder\Resources\Help.txt"...
When I click continue on the error message window, the Help form
displays but without the contents of the Help.txt file.
Here is the frmHelp_Load code:
Private Sub frmHelp_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim AllText, LineOfText As String
' Open the Help.rtf file and load it into rtbHelp.
FileOpen(1, "...\Resources\Help.txt", OpenMode.Input)
Do Until EOF(1)
LineOfText = LineInput(1)
AllText = AllText & LineOfText & vbCrLf
Loop
rtbHelp.Text = AllText
FileClose(1)
End Sub
Like I said... the app works great when run in debug mode...
Thanks in advance,
Gary
-----BEGIN PGP SIGNATURE-----
Version: PGPfreeware 6.5.8 for non-commercial use <http://www.pgp.com>
iQA/AwUBQArvoT8KnwrkurVSEQK+zQCg1x2quJSUCo66wrZu87hN/yOYThYAn2Ee
Z+FcSIpXaeFKjIQff3Hys9T0
=GxNM
-----END PGP SIGNATURE-----