Recordset

di
Anonimizzato10681
il
4 risposte
/
Anonimizzato10681
Utente anonimizzato

Recordset

Raga scusatemi ma come faccio a fare una selezione di un record ad ubna determinata condizione e poi scrivere il risultato in una casella di testo?

Ho provato a fare questo...

valoretarga = Me.cerca_targa.Value
Dim db As Database
Dim rectarga As Recordset
Dim strSql As String
Set db = CurrentDb
strSql = "SELECT auto FROM QrySelect WHERE numero_targa = " & valoretarga & ""
Set rectarga = db.OpenRecordset(strSql)
Me.modello_auto.Value = rectarga

Grazie

4 Risposte

  • P
    pfmarro
    Utente Attivo
    Iscritto da
    mar, 2012
    Messaggi:
    175

    Re: Recordset

    nadirfly ha scritto:

    Raga scusatemi ma come faccio a fare una selezione di un record ad ubna determinata condizione e poi scrivere il risultato in una casella di testo?

    Ho provato a fare questo...

    valoretarga = Me.cerca_targa.Value
    Dim db As Database
    Dim rectarga As Recordset
    Dim strSql As String
    Set db = CurrentDb
    strSql = "SELECT auto FROM QrySelect WHERE numero_targa = " & valoretarga & ""
    Set rectarga = db.OpenRecordset(strSql)
    Me.modello_auto.Value = rectarga

    Grazie
    se numero targa STRINGA
    strSql = "SELECT auto FROM QrySelect WHERE numero_targa = " & CHR(34) & valoretarga & CHR(34)
  • P
    pfmarro
    Utente Attivo
    Iscritto da
    mar, 2012
    Messaggi:
    175

    Re: Recordset

    pfmarro ha scritto:

    nadirfly ha scritto:

    Raga scusatemi ma come faccio a fare una selezione di un record ad ubna determinata condizione e poi scrivere il risultato in una casella di testo?

    Ho provato a fare questo...

    valoretarga = Me.cerca_targa.Value
    Dim db As Database
    Dim rectarga As Recordset
    Dim strSql As String
    Set db = CurrentDb
    strSql = "SELECT auto FROM QrySelect WHERE numero_targa = " & valoretarga & ""
    Set rectarga = db.OpenRecordset(strSql)
    Me.modello_auto.Value = rectarga

    Grazie

    E POI CORREGGI!
    Me.modello_auto.Value = rectarga!numero_targa

    se numero targa STRINGA
    strSql = "SELECT auto FROM QrySelect WHERE numero_targa = " & CHR(34) & valoretarga & CHR(34)
  • @Alex
    @Alex
    Super Famoso
    Iscritto da
    feb, 2012
    Messaggi:
    8764

    Re: Recordset

    Nella proprietà Origine Controllo della TextBox puoi scrivere 1 sola riga usando DLOOKUP...
    
=Dlookup(..... sintassi)
  • /
    Anonimizzato10681
    Utente anonimizzato

    Re: Recordset

    Grazie a tutti.. risolto con dlookup... molto più "semplice"..
    Vi chiedo alcune info.. sto facendo un bd per registrare l'ingresso e l'uscita del personale da una caserma che può avvenire sia a piedi che in auto, condizione che si prevede anche simultaneamente e su due varchi separati... posso utilizzare due lettore di codici a barre contemporaneamente scrivendo su du maschere diverse?
    Eventualmente identificando da una dll il device A da device B?

    Grazie

    Altrimenti mi date una soluzione diversa?
Devi accedere o registrarti per scrivere nel forum
4 risposte