controllo duplicati

[9178angel]

avendo un database access con campo id che non ammette duplicati come faccio a gestire l'eccezione che si solleva inserendo valori uguali nel campo id?

grazie!

[Legnetto]

Non puoi, i campi identity sono nati apposta per impedire quello che vuoi fare tu
Ciao

[9178angel]

non voglio forzare l'inserimento

voglio gestire l'eccezione inserendo un messaggio di errore personalizzato!

[Legnetto]

Opssss.

Metti il codice che contiene la procedura di inserimento in un blocco try e visualizzi l'errore che ti ritona il db.
Nel blocco catch se la stringa di errore è uguale a quella di cui sopra fai quello che credi.
Ciao

[djciko]

se usi SqlServer, prova a gestire :

System.Data.SqlClient.SqlException

[9178angel]

allora ti posto solo la parte della funzione

 

<%@ Page Language="VB" Debug="True"%>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server">
	
    Sub DoReg(ByVal o As Object, ByVal e As EventArgs)
        
        Dim str As String
        Dim cn As OleDbConnection
        Dim sql As String
        Dim cmd As OleDbCommand
        Dim objDataReader As OleDbDataReader
        Dim strnome As String
        Dim objCommand As OleDbCommand
        Dim strsql As String
        Dim objConn As OleDbConnection
        
               
        str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("data/bijou.mdb")
        cn = New OleDbConnection(str)
        cn.Open()
        
        sql = "INSERT INTO Utenti ([id],[password],role,nome,cognome,indirizzo,civico,telefono,cellulare,e_mail) VALUES (?,?,?,?,?,?,?,?,?,?)"
        cmd = New OleDbCommand(sql, cn)
        cmd.Parameters.Add("@id", nickname.Text)
        cmd.Parameters.Add("@password", pass.Text)
        cmd.Parameters.Add("@role", "Utente")
        cmd.Parameters.Add("@nome", nome.Text)
        cmd.Parameters.Add("@cognome", cognome.Text)
        cmd.Parameters.Add("@indirizzo", indirizzo.Text)
        cmd.Parameters.Add("@civico", civico.Text)
        cmd.Parameters.Add("@telefono", telefono.Text)
        cmd.Parameters.Add("@cellulare", cellulare.Text)
        cmd.Parameters.Add("@e_mail", e_mail.Text)
        
        Try
            cmd.ExecuteReader()
            cmd.Connection.Close()
            objConn = New OleDbConnection(str)
            objConn.Open()
            strsql = "SELECT id, password, role  FROM Utenti WHERE id= '" & nickname.Text & "' and password='" & pass.Text & "';"
            objCommand = New OleDbCommand(strsql, objConn)
            objDataReader = objCommand.ExecuteReader(CommandBehavior.CloseConnection)
            If (objDataReader.Read()) = True Then
                If (nickname.Text = objDataReader("id") And pass.Text = objDataReader("password")) Then
                    strnome = nickname.Text & ":" & objDataReader("role")
                    System.Web.Security.FormsAuthentication.RedirectFromLoginPage(strnome, False)
                End If
                Response.Redirect("default.aspx")
            End If
                
           
        Catch ex As DataException
            
            Err.Visible = True
            
        Finally
            
            cmd.Connection.Close()
            cn.Close()
            
        End Try
        
        
        ' cmd.ExecuteReader(CommandBehavior.CloseConnection)

        'cn.Close()
    
        
        Response.Redirect("default.aspx")
        
    End Sub
    
    Sub Cancella(ByVal o As Object, ByVal e As EventArgs)
        nickname.Text = ""
        pass.Text = ""
        pass.Text = ""
        nome.Text = ""
        cognome.Text = ""
        indirizzo.Text = ""
        civico.Text = ""
        telefono.Text = ""
        cellulare.Text = ""
        e_mail.Text = ""
    End Sub
   
    Protected Sub pass2_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs)

    End Sub
</script>

[9178angel]

scusa ma nn ho capito proprio cm devo fare!!!

[9178angel]

ke cscema....ho risolto!


grazie...

[riccardone]

qui hai scritto

Originariamente inviato da 9178angel
Try
cmd.ExecuteReader()

mentre invece dovrebbe essere

cmd.ExecuteNonQuery