#1 How to get the options menu right

[Anonymous]

Private Sub OKbutton_Click()
Dim dp As Integer
Dim wr As Integer
Dim iniFile As Integer
wr = "wwwroot=" + wwwDir.Path
dp = "defaultpage=" + DPage.Text
Open "server.ini" For Output As #iniFile
Write #1, wr
Write #1, dp
Close #iniFile
Unload Me
End Sub

may help, but, I can get the program running right
so..., maby you can struglle a bit with the code...

[Benjamin Flach]

Logged In: YES
user_id=419483

hi,

>Open "server.ini" For Output As #iniFile
>Write #1, wr
>Write #1, dp
>Close #iniFile

should be changed to:

Open "server.ini" For Output As #1
Write #1, wr
Write #1, dp
Close #1

In the open and close command you use the
filenumber "iniFile" and in the write command "1". You can
use everywhere "1" or everywhere "iniFile" but don't mix it.
If you choose to use "iniFile" you have to declare it first.

I hope it works (haven't tried it).

Benni