Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come recuperare i dati in VB6 utilizzando una gamma Data

Il Basic linguaggio di programmazione Visual Basic 6 ti permette di interrogare un database e recuperare le informazioni in base a un intervallo di date . Una tabella di database che ha una data compresa nei record della tabella può essere utilizzata per recuperare le informazioni in base alla data di entrata in tabella . Questo è utile per i programmatori che hanno bisogno di restituire i record per una data specifica e visualizzarla per l'utente. Istruzioni
1

Fare clic sul pulsante di Windows "Start " e selezionare " Tutti i programmi ". Fare clic su " Visual Basic ", quindi fare clic su "Microsoft Visual Basic 6" per aprire il software di programmazione .
2

Fare clic su " File ", quindi su "Apri". Fare doppio clic sul Basic 6 visiva per caricare i file di codice nello spazio di lavoro .
3

Crea la connessione al database. Il collegamento si esegue il login al server di database , per cui l'applicazione dispone di autorizzazioni per interrogare il server . Digitare il seguente codice nel file di codice :

Set con = New ADODB.Connection

con.ConnectionString = " Provider = Microsoft.Jet.OLEDB.4.0; Data Source = MYDB.MDB "

con.Open

In questo esempio , un database di Microsoft Access è aperto. Sostituire il nome del file con il proprio server di database o il nome del file .
4

creare la query che recupera le informazioni in base alla data . In questo esempio , un elenco di clienti viene recuperato secondo data iscrizione . Digitare il seguente codice nel file di codice :

interrogazione Privato Come ADODB.Command

query.CommandText = "select * from clienti dove signup_date tra '1 /1/2010 ' e '12 /31/2010 ' "
5

eseguire il comando per recuperare le informazioni e caricare i risultati in VB6 . In questo esempio , viene mostrato il primo record . Aggiungere il seguente codice per completare il recupero del database :

record = query.Execute

MsgBox record ( 0 ) economici

 

Programmazione © www.354353.com