[access] pescare un valore da una tabella ed usarlo come variabile

martedì 29 giugno 2010 - 17.26

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

bean_bandit Profilo | Newbie

17 messaggi | Data Invio: mar 29 giu 2010 - 17:26

ho questo problema, devo "pescare" un valore dalla tabella clienti contenuto nel campo [offerta] e utlizzarlo nella seguente istruzione:

Dim nomeprogetto As String
nomeprogetto = [offerta]
test = nomeprogetto & ".pdf"
DoCmd.OutputTo acReport, stDocName, acFormatPDF, test

La tabella clienti contiene una sola riga.

come scrivo la sintassi corretta per pescare il valore contenuto nel campo [offerta]?

dinoxet Profilo | Senior Member

484 messaggi | Data Invio: mar 29 giu 2010 - 17:35

>ho questo problema, devo "pescare" un valore dalla tabella clienti contenuto nel campo [offerta] e utlizzarlo nella seguente istruzione:

>Dim nomeprogetto As String
>nomeprogetto = [offerta]
>test = nomeprogetto & ".pdf"
>DoCmd.OutputTo acReport, stDocName, acFormatPDF, test

da dove lanci questa istruzione ?

> come scrivo la sintassi corretta per pescare il valore contenuto nel campo [offerta]?
l'idea potrebe essere la seguente prima di eseguire questa istruzione postresti aprire una maschera collegata allla tabella in modalità nascosta e poi lanciare l'istruzione con questa sintassi :
Dim nomeprogetto As String
nomeprogetto = [nomemaschera]![campodellamaschera(dove leggi il campo interessato)]
test = nomeprogetto & ".pdf"
DoCmd.OutputTo acReport, stDocName, acFormatPDF, test
e poi chiudi la maschera.

DINOXET
__________________________________________
impossible is only a word

bean_bandit Profilo | Newbie

17 messaggi | Data Invio: mer 30 giu 2010 - 11:10

Grazie per la risposta, tuttavia continua a non andare...

> da dove lanci questa istruzione ?
L'istruzione è un codice VB che parte alla chiusura della maschera e mi genera un report in automatico

>l'idea potrebe essere la seguente prima di eseguire questa istruzione postresti aprire una maschera collegata allla tabella in modalità nascosta e poi >lanciare l'istruzione con questa sintassi :
>Dim nomeprogetto As String
>nomeprogetto = [nomemaschera]![campodellamaschera(dove leggi il campo interessato)]
>test = nomeprogetto & ".pdf"
>DoCmd.OutputTo acReport, stDocName, acFormatPDF, test
>e poi chiudi la maschera.

Purtroppo non mi funziona, ho scritto:
nomeprogetto = [90 Riepilogo_Linea]![Offerta]
Dove [90 Riepilogo_Linea] è il nome maschiera ed [Offerta] è il nome del campo nella maschera dove dovrebbe pescare il valore tuttavia mi dice "impossibile trovare il campo "I" a cui si fa rifermento nell'espressione... e nome progetto ovviamente ha valore ""

dinoxet Profilo | Senior Member

484 messaggi | Data Invio: mer 30 giu 2010 - 11:13

ciao rpova a postare mdb che hai fatto conqualche dato di esempio
ci do un occhio

...

se per te va bene

DINOXET
__________________________________________
impossible is only a word

bean_bandit Profilo | Newbie

17 messaggi | Data Invio: mer 30 giu 2010 - 14:32

in allegato il file :)

Appena chiudi la maschera parte il salvataggio in C:\ del file Log_data.pdf

il mio scopo è sostituire la voce Log con quella che trovi nella maschera dove c'è scritto Offerta

grazie :)

dinoxet Profilo | Senior Member

484 messaggi | Data Invio: mer 30 giu 2010 - 15:32

modificalo così :

Private Sub Form_Close()

Dim nomeprogetto As String
Dim stDocName As String
Dim Data As Date
Data = Date
Dim risultato As String
risultato = Format(Data, "yyyy mm dd ")
risultato = Replace(risultato, " ", ".")
nomeprogetto = Offerta2.Value

test = "c:\" & nomeprogetto & risultato & "_" & Time & ".pdf"

stDocName = "01 Riepilogo Completo"
DoCmd.OutputTo acReport, stDocName, acFormatPDF, test

End Sub

a me funziona
DINOXET
__________________________________________
impossible is only a word

bean_bandit Profilo | Newbie

17 messaggi | Data Invio: gio 1 lug 2010 - 11:13

Grazie mille! Funziona, non credevo bastasse usare la stessa sintassi di excel!

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !