Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it L'avatar di Dani87
    Registrato dal
    Aug 2003
    Messaggi
    379

    [SQL - VB.Net] Inserimento valori

    Sono un pò all'inizi di programmazione e mi diverto col visual studio..


    Sapete dirmi cosa sbaglio??


    codice:
      
    
            Dim cn As New SqlClient.SqlConnection("data source=.; INITIAL CATALOG=disc; user id =sa; password=xxxxxx")
            Dim cm As New SqlClient.SqlCommand("insert into Listaingressi values (@p1, @p2, @p3)", cn)
    
            cm.Parameters.Add("@p1", SqlDbType.NVarChar).Value = Me.TxtNome.Text
            cm.Parameters.Add("@p2", SqlDbType.NVarChar).Value = Me.TxtCognome.Text
            cm.Parameters.Add("@p3", SqlDbType.NVarChar).Value = Me.TxTingresso.Text
    
    
    
            Try
                cn.Open()
                cm.ExecuteNonQuery()
                cn.Close()
                Label6.Text = "inserimento effettuato"
            Catch ex As Exception
                Label6.Text = " si è verificato un errore: " & ex.Message
    
    
            End Try
    l'errore è: incorrect sintax near ')'.


    Grazie
    : )

  2. #2

    Re: [SQL - VB.Net] Inserimento valori

    Originariamente inviato da Dani87
    Sono un pò all'inizi di programmazione e mi diverto col visual studio..


    Sapete dirmi cosa sbaglio??


    codice:
      
    
            Dim cn As New SqlClient.SqlConnection("data source=.; INITIAL CATALOG=disc; user id =sa; password=xxxxxx")
            Dim cm As New SqlClient.SqlCommand("insert into Listaingressi values (@p1, @p2, @p3)", cn)
    
            cm.Parameters.Add("@p1", SqlDbType.NVarChar).Value = Me.TxtNome.Text
            cm.Parameters.Add("@p2", SqlDbType.NVarChar).Value = Me.TxtCognome.Text
            cm.Parameters.Add("@p3", SqlDbType.NVarChar).Value = Me.TxTingresso.Text
    
    
    
            Try
                cn.Open()
                cm.ExecuteNonQuery()
                cn.Close()
                Label6.Text = "inserimento effettuato"
            Catch ex As Exception
                Label6.Text = " si è verificato un errore: " & ex.Message
    
    
            End Try
    l'errore è: incorrect sintax near ')'.

    Grazie
    Sono anchio agli inizi ed ho piu' o meno lo stesso problema
    credo che tu dimentichi questo :

    codice:
            Dim cm As New SqlClient.SqlCommand("insert into Listaingressi (nome, cognome, ingresso) values (@p1, @p2, @p3)", cn)

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.