All pastes #336511 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-02-02 02:05 UTC
rendered paste body
Private Sub cmdFinished_Click(Index as Integer)
    MainRecs.AddNew
    MainRecs.Fields("ServerName") = txtServer_Name.text
    MainRecs.Update
    MainRecs.Close
End Sub