PDA

Visualizza la versione completa : access


hulkster
31-07-2002, 18:51
ciao a tutti, ho fatto una maschera in access dove c' un bottone
vhe lancia una query di aggiornamento.
io volevo che la query prendesse i valori inseriti nella maschera in textbox, invece quando schiaccio il bottone della query esce una finestra che mi dice di mettere i valori che avrebbe dovuto prendere dalla maschera.
perch fa cosi?
spero di essere stato chiaro

ladyBlu
31-07-2002, 18:53
chiarissimo a parole, ma se posti il codice che usi si capir ancora meglio, eheheheheh!!!
;) :D

hulkster
31-07-2002, 18:55
nella query dove c aggiorna a: io messo questo:



[Maschere]![inserimento]![prezzo]


che il nome della casella di testo della maschera

ladyBlu
31-07-2002, 18:57
si, ho capito, ma forse mi sono spiegata male;
posta il codice associato all'evento click del tuo bottone e la query che usi, ok?
:D

hulkster
31-07-2002, 19:00
quando ho creato il bottone ho scelto nella categoria varie apri query e gli ho dato il nome della query.

:bh:

ladyBlu
31-07-2002, 19:03
senti, hulkster, io vorrei tanto darti una mano, ma se non leggo le istruzioni che usi esattamente come le hai scritte, credo proprio che potr fare poco, anzi nulla...
:stordita:

hulkster
31-07-2002, 19:07
ok, allora sul bottone al click c routin evento e il codice di visual basi c questo

Option Compare Database

Private Sub Comando17_Click()
On Error GoTo Err_Comando17_Click

Dim stDocName As String

stDocName = "aggiorna"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Comando17_Click:
Exit Sub

Err_Comando17_Click:
MsgBox Err.Description
Resume Exit_Comando17_Click

End Sub
Private Sub Comando18_Click()
On Error GoTo Err_Comando18_Click

Dim stDocName As String

stDocName = "aggiornamento"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Comando18_Click:
Exit Sub

Err_Comando18_Click:
MsgBox Err.Description
Resume Exit_Comando18_Click

End Sub




e questa la query

UPDATE articoli SET articoli.[prezzo vendita] = [Maschere]![inserimento]![prezzo]
WHERE (((articoli.[cod prodotto])=[Maschere]![inserimento]![codiceprodotto]));


questo tutttoooo tutttooo il codice cho ho usato



:dh:

ladyBlu
31-07-2002, 19:15
se i due valori sono numerici,
prova a scrivere la query direttamente da codice e cambiala cos:


mioPrezzo = [Maschere]![inserimento]![prezzo]
mioCodProd = [Maschere]![inserimento]![codiceprodotto]

miaSQL = "UPDATE articoli SET articoli.[prezzo vendita] = " &
mioPrezzo
miaSQL = miaSQL & " WHERE articoli.[cod prodotto] = " & mioCodProd


e poi la apri sul clik del bottone!!!

hulkster
01-08-2002, 09:40
rieccomi qu

allora
io ho messo questo codice in vb

Option Compare Database


Private Sub Comando19_Click()
On Error GoTo Err_Comando19_Click

mioPrezzo = [Maschere]![inserimento]![prezzo]
mioCodProd = [Maschere]![inserimento]![codiceprodotto]

miaSQL = "UPDATE articoli SET articoli.[prezzo vendita] = " & mioPrezzo
miaSQL = miaSQL & " WHERE articoli.[cod prodotto] = " & mioCodProd

Exit_Comando19_Click:
Exit Sub

Err_Comando19_Click:
MsgBox Err.Description
Resume Exit_Comando19_Click

End Sub



ma mi daquesto errore

impossibile trovare il campo | a cui si fa riferimento nell'espressione

?!?

ladyBlu
01-08-2002, 09:48
ma [prezzo] e [codiceprodotto] che sono sulla maschera sono textbox, giusto?
:confused:

Loading