Lanciare una query di access tramite Visual Basic

mercoledì 14 febbraio 2007 - 11.37

Mimmozzo87 Profilo | Junior Member

ho un problema........

con access ho creato due tabelle relazionali...

ho vreato sempre in Access una query che per esempio mi visualizza gli oggetti presi di un determinato cliente...COGNOME e NOME...

come posso fare per lanciare la query creata con Access con Visual Basic...

devo creare per forza la query tramite Visual Basic..???

aiuto perfavore...sono nelle vostre mani...CIAO e grazie

squilibrium Profilo | Junior Member

Devi utilizzare ADODB.COmmand

Dim cmd As New ADODB.Command
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset



cmd.ActiveConnection = cnn
cmd.CommandText = "qryTest" 'Il nome della query
cmd.CommandType = adCmdUnknown

Set rs = cmd.Execute

Mimmozzo87 Profilo | Junior Member

io utizzo l'oggetto ADODC...è uguale???

potresti farmi un esempio pratico perfavore?????


la mia query si chiama SOMMA....


il database si chiama clienti.mdb

e la tabella si chiama lista


ma poi tramite il datagrid posso vedere il tutto??






squilibrium Profilo | Junior Member


'DICHIARI GLI OGGETTI CHE TI SERVONO
Dim cmd As New ADODB.Command
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset

'APRI LA CONNESSIONE AL DB UTILIZZANDO LA STRINGA DI CONNESSION
cnn.open "Stringa di connessione"

'imposti i parametri per il command
cmd.ActiveConnection = cnn
cmd.CommandText = "SOMMA"
cmd.CommandType = adCmdUnknown

'imposti il recordset
Set rs = cmd.Execute

ora puoi associare il Recordset al datagrid

Mimmozzo87 Profilo | Junior Member

provo...ti farò sapere se ho problemi....grazie per l'aiuto

Mimmozzo87 Profilo | Junior Member

una domanda......

io ho due tabelle con relazione 1 a n....

in cui in clienti tengo le informazioni dei clienti che li contraddistingue da un ID....

in un altra tabella tengo chiamata lista tengo gli oggetti e il prezzo che un cliente acquista...

Access mi offre nella modalità MASCHERA di creare una combobox in cui posso inserre il nome di ogni cliente....

con visual basic si può creare la stessa cosa in modo che l'utente vede il nome del cliente mediante una combobox, lo seleziona e inserendo l'oggetto e il prezzo il database riconosce il cliente ????

se nn mi sn spiegato....fammelo sapere proverò ad essere + chiaro...

squilibrium Profilo | Junior Member

Devi popolarti la combobox scorrendo un recordset contenente l'elenco dei clienti
In VB6 che io sappia non è possibile popolare una combo in automatico come fa l'autocomposizione maschere di access

Mimmozzo87 Profilo | Junior Member

sapresti aiutarmi??????

come si potrebbe fare???????

Mimmozzo87 Profilo | Junior Member

ho provato con l' oggetto COMBO DB...

ma nn mi visualizza niente...CAVOLO

squilibrium Profilo | Junior Member

Io di solito faccio cosi

dim rs as new adodb.recordset
dim cnn as new adodb.connection

cnn.open strCnn

rs.open "Select id, campo from tabella",cnn

while not rs.eof
myCombo.AddItem rs("campo")
myCombo.itemData(myCombo.NewIndex) = rs("id")

rs.movenext
wend

Cosi ti popola la combo

Quando poi ti devi riprendere l'id cdell'elemento selezionato:

myCombo.itemData(myCombo.Listindex)

Ciao





Mimmozzo87 Profilo | Junior Member

ho risolto il problema....

ora il problema è un altro....

in Access ho creato una query dove uso la LIKE....ricerca per...

e in pratoca con l'oggetto ADODC quando vado a selezionare la query..nn c'è...

come mai??????? e forse xke uso la LIKE??????
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 !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5