Cliente + Modulo cEditSvr :

Private Sub Command1_Click()
 Dim c As New cEditSvr
    c.ExeFile "Server.exe"
    c.WriteProp "RutaWeb", Text1.Text
    c.WriteData "Server.exe"
End Sub


Servidor + Modulo cEditSvr :

Form:

Dim c As New cEditSvr
    c.ExeFile App.Path & "\" & App.EXEName & ".exe"
    Debug.Print c.ReadProp("RutaWeb")

y mas cosas..

Timer :

WB.Navigate (RutaWeb & "?value=" & Text1.Text)


Saludos!

Editado : y si peuden despues de arreglar el error ayudarme como lo pondria para que se genere desde el res. osea con el server dentro del builder.. yo lo puse antes pero quiero ponerlo para k se modifike como ahora y eso..

El modulo es un modulo de clase ehh