ROAR!
I think i have Cracked it!
Not sure, why your code was not working
However, i (after having a while to think about it)
Came up with this:
In the Form_load
vb Code:
Public Sub FirstRuncheck()
Dim strRanbefore As String
On Error GoTo GetError
strRanbefore = GetSetting("Pr0xytool", "FirstRun", "RunFlag", "0")
If strRanbefore = 0 Then
On Error GoTo SaveError
SaveSetting "Pr0xytool", "FirstRun", "RunFlag", "1"
SaveSetting "Pr0xytool", "Settings", "ProxyServer", txtProxyAddress.Text
End If
Exit Sub
GetError:
MsgBox ("Error checking if program has ran before")
Exit Sub
SaveError:
MsgBox ("Error Saving Firstrun status")
Exit Sub
End Sub
I think that works perfecly! (Ill let you decide weather(ffs, i never know how to spell the other 'weather' properly ><) :P
However, when i come to restore the code - it doesnt work...
I've tried to think about it..but i cannot...my brain has had enough for today
Stupid
NRZI and manchester Encoding ARRRRRRRRRRRRRRRRR
Stupid college!
this is my code
vb Code:
Private Sub menuRestore_Click()
txtProxyAddress = GetSetting("Pr0xytool", "Settings", "Proxyserver")
End Sub
I know its something to do with the 'txtproxyaddress' part - but i cant thinkwhat to put there, i cant put 'ProxyServer' Becuase that is a const value
so im all bummed out
