passare valore controllo formato testo

[Giuseppe]

Salve a tutto l'NG.
Ho una maschera "frmanagrafica" e arrivati al controllo "codcomune" o
inserisco il codice comune (il codice che si utilizza nel codice
fiscale quindi in formato testo) oppure apro la maschera di ricerca
"ricercacomune" e dopo aver scelto il comune dalla casella di
riepilogo su evento click chiudo la maschera e il valore mi viene
automaticamente assegnato al controllo della maschera.
Questa operazione che utilizzo spesso funziona quando il valore è in
formato numerico, in questo caso il valore è in formato testo.
Il codice è il seguente:
su evento keydown del controllo codcomune della form frmanagrafica:
If KeyCode = vbKeyF2 Then
DoCmd.OpenForm "RicercaComune", , , , , , Me.Name
end if
nella maschera di ricerca l'elenco della casella di riepilogo mi
visualizza 4 campi: codicecomune, ComuneOStato, Cap e Provincia. La
colonna associata ovviamente è la prima.
Appena clicco su una voce dell'elenco dei comune mi appare il seguente
messaggio:
errore d runtime '13' tipo non corrispondente
sul debug mi evidenza questo codice rs.FindFirst "[codicecomune] =
" & Str(Me![Elenconominativi])
Cosa dovrei cambiare?
Grazie in anticipo.
Ciao.

[Karl Donaubauer]

Giuseppe wrote:
> Ho una maschera "frmanagrafica" e arrivati al controllo "codcomune" o
> inserisco il codice comune (il codice che si utilizza nel codice
> fiscale quindi in formato testo) oppure apro la maschera di ricerca
> "ricercacomune" e dopo aver scelto il comune dalla casella di
> riepilogo su evento click chiudo la maschera e il valore mi viene
> automaticamente assegnato al controllo della maschera.

> Questa operazione che utilizzo spesso funziona quando il valore � in
> formato numerico, in questo caso il valore � in formato testo.
> Il codice � il seguente:

> su evento keydown del controllo codcomune della form frmanagrafica:
> If KeyCode = vbKeyF2 Then
> DoCmd.OpenForm "RicercaComune", , , , , , Me.Name
> end if
> nella maschera di ricerca l'elenco della casella di riepilogo mi
> visualizza 4 campi: codicecomune, ComuneOStato, Cap e Provincia. La

> colonna associata ovviamente � la prima.

> Appena clicco su una voce dell'elenco dei comune mi appare il seguente
> messaggio:
> errore d runtime '13' tipo non corrispondente
> sul debug mi evidenza questo codice rs.FindFirst "[codicecomune] =
> " & Str(Me![Elenconominativi])
> Cosa dovrei cambiare?

Un testo ha bisogna di ' , cio� p.e.

rs.FindFirst "[codicecomune] = '" & Me!Elenconominativi & "'"

--
HTH
Karl
*********
Access FAQ: www.donkarl.com/it

[Giuseppe]

On 23 Nov, 18:00, "Karl Donaubauer" <NoS...@donkarl.com> wrote:
> Giuseppe wrote:
> > Ho una maschera "frmanagrafica" e arrivati al controllo "codcomune" o
> > inserisco il codice comune (il codice che si utilizza nel codice
> > fiscale quindi in formato testo) oppure apro la maschera di ricerca
> > "ricercacomune" e dopo aver scelto il comune dalla casella di
> > riepilogo su evento click chiudo la maschera e il valore mi viene
> > automaticamente assegnato al controllo della maschera.

> > Questa operazione che utilizzo spesso funziona quando il valore è in
> > formato numerico, in questo caso il valore è in formato testo.
> > Il codice è il seguente:

> > su evento keydown del controllo codcomune della form frmanagrafica:
> > If KeyCode = vbKeyF2 Then
> > DoCmd.OpenForm "RicercaComune", , , , , , Me.Name
> > end if
> > nella maschera di ricerca l'elenco della casella di riepilogo mi
> > visualizza 4 campi: codicecomune, ComuneOStato, Cap e Provincia. La

> > colonna associata ovviamente è la prima.

> > Appena clicco su una voce dell'elenco dei comune mi appare il seguente
> > messaggio:
> > errore d runtime '13' tipo non corrispondente
> > sul debug mi evidenza questo codice    rs.FindFirst "[codicecomune] =
> > " & Str(Me![Elenconominativi])
> > Cosa dovrei cambiare?
>

> Un testo ha bisogna di ' , cioè p.e.

>
> rs.FindFirst "[codicecomune] = '" & Me!Elenconominativi & "'"
>
> --
> HTH
> Karl
> *********
> Access FAQ:www.donkarl.com/it

grazie Karl.
Ciao.

[Giuseppe]

Scusa Karl una domanda.
Ho inserito nella maschera una combo (idcomune) non associata con
origine =codcomune non visibile.
Tramite il codice
Private Sub CodComune_Exit(Cancel As Integer)
Me.Luogonascita.Value = Me.IDComune.Column(1)
Me.CAPnascita.Value = Me.IDComune.Column(2)
Me.Provincianascita.Value = Me.IDComune.Column(3)
End Sub
I controlli luogonascita, capnascita e provincianascita sono
associati.
Come posso fare ad aggiornarli appena la maschera di ricerca mi ha
restituito il codice comune senza dover aspettare che esco dal
controllo codcomune?
Ho provato a impostare lo stesso codice su evento modifica del
controllo codcomune e non funziona, ho provato con il requery della
combo e non funziona.
Come posso vedere da subito tutte e 4 i controlli già inseriti
simultaneamente?
Grazie ancora.