Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
SQL Server 2000/2005/2008, Express, Access, MySQL, Oracle
Casella combinata di ricerca aiuto come faccio?
mercoledì 10 gennaio 2007 - 17.36
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
alex2674
Profilo
| Newbie
5
messaggi | Data Invio:
mer 10 gen 2007 - 17:36
volevo sapere come fare per creare una casella combinata
per fare una ricerca filtrando in una casella di riepilogo in base a una
tabella i valori della casella combinata
mi spiego meglio ho una tabella con tutte le nazioni Countries e vorrei che
se seleziono per esempio "italia" dalla casella combinata mi visualizzi
nella casella di riepilogo i record che sono in italia
la maschera dove voglio reare la casella combinata si chiama frmRicerca e la tabella che contiene i valori che deve avere la casella
combinata si chiama Countries
grazie a
tutti
p.s io non sono molto esperto di access quindi indicatemi tutti i passaggi passo passo
fasol
Profilo
| Junior Member
125
messaggi | Data Invio:
mer 10 gen 2007 - 22:55
non ho capito se lo devi fare in vb o in access... ti metto un abbozzo di codice.. forse ti è d'aiuto, ma devi vederti le istruzioni sql:
Public Const PROVIDER As String = _
"provider=microsoft.Jet.oledb.4.0; data source="
Dim conn As New ADODB.Connection
Dim rcst As New ADODB.recordset
Dim strSql As String
'devi creare l'istruzione sql ke ti permette di cercare nella tabella x ciò ke desideri ed eventualmente ordinarlo
'esempio: strSql= "SELECT DISTINCT CampoNazione FROM Countries ORDER BY ....."
' devi indicare la path del db: SOURCE_DB = "c:\...."
openDbOnlyRead conn, rcst, PROVIDER & SOURCE_DB, strSql
'poi carichi tutto nella combobox
Do While Not (rcst.EOF) ' Loop fino ad end of table
FormX.ComboY.AddItem (rcst.Fields("CampoNazione"))
rcst.MoveNext
Loop
'poi chiudi le connessioni
If rcst.State <> 0 Then
rcst.Close
Set rcst = Nothing
End If
If conn.State <> 0 Then
conn.Close
Set conn = Nothing
End If
' dopo di che devi creare una seconda istruz sql x fare in modo ke dopo aver selezionato la nazionalità nella comboBox ricerca tutti i record ke appartengono alla nazione selezionata
in acccess puoi verificare direttamente le istruz sql creando le query, puoi farti aiutare a comporle con la creazione guidata, poi vedi il codice sql creato andando in visualizzazione struttura
meglio i perdenti xkè hanno la speranza di vincere...cosa che i vincenti nn hanno....
alex2674
Profilo
| Newbie
5
messaggi | Data Invio:
gio 11 gen 2007 - 17:42
266_agenzia modelle aggiornato.zip
lo devo fare in access allora vi dico cosa ho fatto:
ho creato una casella combinata chiamata cmbNazionalità
vado in visualizzazione struttura e:
su tipo origine riga metto Tabella/query
poi su origine riga ho messo SELECT Countries.code, Countries.country FROM
Countries;
perche ho una tabella Countries con due campi code e country e sulla casella
combinata voglio visualizzare country
il codice vba è questo
If StrWhere = "" And Me.cmbNazionalità <> "" Then
StrWhere = "where nazionalità<= " & Me.cmbNazionalità
Else
StrWhere = StrWhere & " and nazionalità<= " & Me.cmbNazionalità
End If
poi quando vado a selezionare dopo aver salvato e riaperto la maschera per
esempio italia mi compare il messaggio " errore di compilazione impossibile
trovare ilmetoto o il membro dei dati" sottolineandomi in blu
.cmbNazionalità
dove ho sbagliato a scrivere?
allego il db ditemi cosa non va mi raccomando
grazie a tutti x l'aiuto
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 !