
Originariamente inviata da
djciko
Posta il codice
codice:
Protected Sub FormView1_Iteminserting(ByVal sender As Object, ByVal e As FormViewInsertEventArgs) Handles FormView1.ItemInserting
Dim almes As String = "", strsql As String = ""
If Page.IsValid Then
Try
Dim cn = New SqlConnection(ConfigurationManager.ConnectionStrings("FLINK").ConnectionString)
Using cn
cn.Open()
'controllo che non ci sia già usern uguale in db
strsql = "SELECT op_ID FROM operatori WHERE usern=@usern"
Dim cmd = New SqlCommand(strsql, cn)
Dim usern As TextBox = FormView1.FindControl("textuser")
cmd.Parameters.AddWithValue("@usern", usern.Text)
Dim rs As SqlDataReader = cmd.ExecuteReader()
If rs.HasRows Then
'qui deve cancellare l'inserimento e mandare al catch exception dove fa comparire un alert
'ma mi pare che l'e.cancel=true faccia anche uscire dalla sub (e quindi niente alert)
End If
'inserimento
strsql = "INSERT INTO operatori ........ "
Dim cmd = New SqlCommand(strsql, cn)
cmd.ExecuteNonQuery()
End Using
almes = "alert('Credenziali corretamente inserite.');window.location.href = 'mypage.aspx';"
Page.ClientScript.RegisterClientScriptBlock(Me.GetType(), "MyScript", almes, True)
Catch ex As Exception
almes = "alert('Username già in uso, scegline una diversa.');"
Page.ClientScript.RegisterClientScriptBlock(Me.GetType(), "MyScript", almes, True)
End Try
End If
End Sub