L
Laura
Guest
I am trying to fill my table clients but I only can fill in one !!!!
can you help me please?
Protected Sub cmdversturen_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdversturen.Click
Dim clientid As Integer = 0
Dim naam As String = txtNaam.Text
Dim voornaam As String = txtVoornaam.Text
Dim geslacht As String = drpGeslacht.Text
Dim adres As String = txtAdres.Text
Dim postcode As String = txtPostcode.Text
Dim gemeente As String = txtGemeente.Text
Dim land As String = txtLand.Text
Dim tel As String = txtTelefoon.Text
Dim gsm As String = txtGsm.Text
Dim email As String = txtEmail.Text
Dim gebruikersnaam As String = txtgebruikersnaam.Text
Dim wachtwoord As String = txtwachtwoord.Text
If (clientid > 0) Then
clientid = clientid + 1
Else
clientid = 1
End If
serviceClient.insertingclient(clientid, naam, voornaam, geslacht, adres, postcode, gemeente, land, tel, gsm, email, gebruikersnaam, wachtwoord)
'serviceClient.updateclient(clientid, naam, voornaam, geslacht, adres, postcode, gemeente, land, tel, gsm, email, gebruikersnaam, wachtwoord)
Response.Redirect("ingelogd.aspx")
can you help me please?
Protected Sub cmdversturen_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdversturen.Click
Dim clientid As Integer = 0
Dim naam As String = txtNaam.Text
Dim voornaam As String = txtVoornaam.Text
Dim geslacht As String = drpGeslacht.Text
Dim adres As String = txtAdres.Text
Dim postcode As String = txtPostcode.Text
Dim gemeente As String = txtGemeente.Text
Dim land As String = txtLand.Text
Dim tel As String = txtTelefoon.Text
Dim gsm As String = txtGsm.Text
Dim email As String = txtEmail.Text
Dim gebruikersnaam As String = txtgebruikersnaam.Text
Dim wachtwoord As String = txtwachtwoord.Text
If (clientid > 0) Then
clientid = clientid + 1
Else
clientid = 1
End If
serviceClient.insertingclient(clientid, naam, voornaam, geslacht, adres, postcode, gemeente, land, tel, gsm, email, gebruikersnaam, wachtwoord)
'serviceClient.updateclient(clientid, naam, voornaam, geslacht, adres, postcode, gemeente, land, tel, gsm, email, gebruikersnaam, wachtwoord)
Response.Redirect("ingelogd.aspx")