Public Function registerUser(ByVal title As String, ByVal name As String, _
ByVal surname As String, ByVal address As String, ByVal telephone As String, _
ByVal mobile As String, ByVal email As String, ByVal psswd As String)
Dim registerQuery As String = "INSERT into clt_details_cd" & _
" values('" & title & "','" & name & "','" & surname & "'," & _
"'" & address & "'," & _
"'" & telephone & "','" & mobile & "','" & email & "','" & psswd & "')"
Dim insertCommand As New SqlCommand(registerQuery, myConnection)
myConnection.Open()
insertCommand.ExecuteNonQuery()
myConnection.Close()
End Function