Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
C# / VB.NET - [VB.Net] INSERT o UPDATE
Forum - C# / VB.NET - [VB.Net] INSERT o UPDATE - Pagina 2

Pagine: [ 1 2 3 ] Precedente | Prossimo
Avatar
sps84 (Normal User)
Expert


Messaggi: 202
Iscritto: 11/02/2009

Segnala al moderatore
Postato alle 19:38
Mercoledì, 02/09/2009
un macello no riesco
:om::om:

PM Quote
Avatar
sps84 (Normal User)
Expert


Messaggi: 202
Iscritto: 11/02/2009

Segnala al moderatore
Postato alle 21:01
Mercoledì, 02/09/2009
If AccessCommand.CommandText = "SELECT * FROM DettOrdini WHERE EXIST (SELECT * FROM .............DettOrdini WHERE IDArticolo = @Codice);" Then

            MsgBox("Update")
            AccessCommand.CommandText = "UPDATE DettOrdini set IDArticolo = @Codice,       ............Quantità = @LblQuantità WHERE @Codice = IDArticolo;"

        Else

            MsgBox("Insert")
            AccessCommand.CommandText = "INSERT INTO DettOrdini (IDArticolo, Quantità) ............VALUES(@Codice, @LblQuantità);"

        End If

PM Quote
Avatar
BugliL (Member)
Pro


Messaggi: 135
Iscritto: 09/08/2009

Segnala al moderatore
Postato alle 23:08
Mercoledì, 02/09/2009
Testo quotato
Postato originariamente da sps84:
"SELECT * FROM DettOrdini WHERE EXIST (SELECT * FROM DettOrdini WHERE IDArticolo = @Codice);"


Non vedo dove esegui questa query....
L'oggetto "AccessCommand" non ha un metodo "Execute" o qualcosa del genere?

Comunque usi direttamente questa query
Codice sorgente - presumibilmente C# / VB.NET
  1. SELECT * FROM DettOrdini WHERE IDArticolo = @Codice

e controlli se il risultato è nullo.... fai prima, meglio e funziona sempre...

PM Quote
Avatar
sps84 (Normal User)
Expert


Messaggi: 202
Iscritto: 11/02/2009

Segnala al moderatore
Postato alle 23:27
Mercoledì, 02/09/2009
Testo quotato
Postato originariamente da BugliL:

Testo quotato
Postato originariamente da sps84:
"SELECT * FROM DettOrdini WHERE EXIST (SELECT * FROM DettOrdini WHERE IDArticolo = @Codice);"


Non vedo dove esegui questa query....
L'oggetto "AccessCommand" non ha un metodo "Execute" o qualcosa del genere?

Comunque usi direttamente questa query
Codice sorgente - presumibilmente C# / VB.NET
  1. SELECT * FROM DettOrdini WHERE IDArticolo = @Codice

e controlli se il risultato è nullo.... fai prima, meglio e funziona sempre...


La qery la esegue sempre sulla stessa tabella...:d

non riesco a far funzionare l 'IF

PM Quote
Avatar
BugliL (Member)
Pro


Messaggi: 135
Iscritto: 09/08/2009

Segnala al moderatore
Postato alle 11:34
Giovedì, 03/09/2009
Testo quotato
Postato originariamente da BugliL:
Non vedo dove esegui questa query....
L'oggetto "AccessCommand" non ha un metodo "Execute" o qualcosa del genere?

PM Quote
Avatar
sps84 (Normal User)
Expert


Messaggi: 202
Iscritto: 11/02/2009

Segnala al moderatore
Postato alle 0:03
Venerdì, 04/09/2009
La query la faccio dove faccio le altre... Porta pazienza ma sto imparando....

AccessCommand ha solo ExecuteNonQuery  o  ExecuteReader  o  ExecuteScalar....:rofl:

PM Quote
Avatar
BugliL (Member)
Pro


Messaggi: 135
Iscritto: 09/08/2009

Segnala al moderatore
Postato alle 16:11
Venerdì, 04/09/2009
Testo quotato
Postato originariamente da sps84:
ExecuteNonQuery


L'ho cercato negli oggetti di VB 2008....
è il metodo che esegue la query... dopo aver definito la Query devi richiamare questo metodo per farla eseguire a quanto sembra...

PM Quote
Avatar
sps84 (Normal User)
Expert


Messaggi: 202
Iscritto: 11/02/2009

Segnala al moderatore
Postato alle 23:17
Lunedì, 07/09/2009
guarda perdonami ma sto impazzendo... ti posto il codice dimmi solo dove sbaglio...

Codice sorgente - presumibilmente VB.NET
  1. Dim str As String
  2.  
  3.         If AccessCommand.CommandText = "SELECT * from DettOrdini WHERE @Codice =  ........IDArticolo;" = True Then
  4.  
  5.             MsgBox("Insert")
  6.             str = "INSERT INTO DettOrdini (IDArticolo, Quantità) VALUES(@Codice, ........@LblQuantità);"
  7.  
  8.         Else
  9.  
  10.             MsgBox("Update")
  11.             str = "UPDATE DettOrdini set IDArticolo = @Codice, Quantità = @LblQuantità ............WHERE @Codice = IDArticolo;"
  12.  
  13.         End If
  14.  
  15.         AccessCommand.CommandText = (str.ToString)
  16.  
  17.         'AccessCommand.CommandText = "UPDATE DettOrdini SET IDArticolo = @Codice, .........Quantità = @LblQuantità WHERE @Codice = IDArticolo ELSE INSERT INTO DettOrdini .........(IDArticolo, Quantità) VALUES(@Codice, @LblQuantità);"
  18.  
  19.         AccessCommand.Parameters.AddWithValue("@Codice", LblCodice.Text)
  20.  
  21.         AccessCommand.Parameters.AddWithValue("@LblQuantità", TxtPezziOrdine.Text)
  22.  
  23.         Try
  24.             AccessCommand.ExecuteNonQuery()
  25.         Catch err As Exception
  26.             MessageBox.Show(err.ToString)
  27.         End Try

PM Quote
Pagine: [ 1 2 3 ] Precedente | Prossimo