Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Visual Basic 6 - aprire  un gruppo di date
Forum - Visual Basic 6 - aprire un gruppo di date

Pagine: [ 1 2 3 4 ] Precedente | Prossimo
Avatar
magicolotto (Normal User)
Expert


Messaggi: 338
Iscritto: 21/01/2008

Segnala al moderatore
Postato alle 14:31
Mercoledì, 25/02/2009
Ciao ragazzi

ho un archivio in access

sto cercando di aprire  tramite  una connessione  un gruppo di recordset

nella tabella  c è il campo data.

io per appunto dovrei aprire  un gruppo di date , ch vadano da  una certa data ad  un'altra scelta.

apro la connessione e visualizzo il tutto in una  SMHFLEXGRID, e visulizzo le  ultime estrazioni in questo  mo do :


Codice sorgente - presumibilmente VB.NET

  1. Dim sConnect As String
  2.     Dim sSQL, data As String
  3.     Dim dfwConn As ADODB.Connection
  4.     Dim i As Integer
  5.  
  6.  
  7.     ' imposta le stringhe
  8.     sConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;User ID=Admin;Data Source=" & App.path & "\archivio.mdb;;Jet OLEDB:Database Password=12345678910112;"
  9.     sSQL = "select ID,Data,BA1,BA2,BA3,BA4,BA5 from archivio"
  10.   data = Format(data, "dd/mm/yyyy")
  11.     ' apre la connessione
  12.     Set dfwConn = New Connection
  13.     dfwConn.Open sConnect
  14.  
  15.     ' crea un gruppo di record utilizzando l'insieme specificato
  16.     Set datPrimaryRS = New Recordset
  17.     datPrimaryRS.CursorLocation = adUseClient
  18.     datPrimaryRS.Open sSQL, dfwConn, adOpenForwardOnly, adLockReadOnly
  19.  
  20.     Set MSHFlexGrid1.DataSource = datPrimaryRS


dovrei far si di aprire un gruppo di date

come  potrei fare??


PM Quote
Avatar
theprogrammer (Normal User)
Guru^2


Messaggi: 2509
Iscritto: 28/01/2009

Segnala al moderatore
Postato alle 16:00
Mercoledì, 25/02/2009
Non capisco cosa voglia dire "aprire un gruppo di date" ...

PM Quote
Avatar
magicolotto (Normal User)
Expert


Messaggi: 338
Iscritto: 21/01/2008

Segnala al moderatore
Postato alle 16:06
Mercoledì, 25/02/2009
Codice sorgente - presumibilmente Plain Text

  1. sto cercando di aprire  tramite  una connessione  un gruppo di recordset


un gruppo di record da archivio


gruppo che vada da una data( campo data) ad altra data.

PM Quote
Avatar
theprogrammer (Normal User)
Guru^2


Messaggi: 2509
Iscritto: 28/01/2009

Segnala al moderatore
Postato alle 20:59
Mercoledì, 25/02/2009
Non e' che ti spieghi tanto chiaramente ... comunque, basta una SELECT con una WHERE opportuna, ad esempio

SELECT ... WHERE tuadata BETWEEN data1 AND data2

in cui tuadata e' il campo che contiene la data e data1 e data2 sono l'inizio e la fine dell'intervallo. Naturalmente, la sintassi varia un poco a seconda del db che usi.

PM Quote
Avatar
magicolotto (Normal User)
Expert


Messaggi: 338
Iscritto: 21/01/2008

Segnala al moderatore
Postato alle 10:30
Giovedì, 26/02/2009
si, infatti  facevo in questo modo.

Pero' non  funzionava.

Dopo la tua conferma sono  andato a rivedere il xchè

ho notato che  il capompo data, nella struttura, è NUMERICO

quindi non funziona,  se  invece lo modifico in DATA/ORA

funziona

come posso far si che funziona lasciandolo come NUMERICO?


PM Quote
Avatar
theprogrammer (Normal User)
Guru^2


Messaggi: 2509
Iscritto: 28/01/2009

Segnala al moderatore
Postato alle 16:00
Giovedì, 26/02/2009
Intanto non capisco come faccia ad essere numerico (come scrivi una data con un numero??).

In secondo luogo, mi dispiace, ma devi fare in modo che il campo sia di tipo Date/Time.

Un valore Data DEVE essere inserito in un campo Date/Time nel DB. Non ha senso fare diversamente.

Quindi, armati di pazienza, cambia il tipo di campo nel DB e opera di conseguenza nel programma.

PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 19:30
Giovedì, 26/02/2009
devi utilizzare il seguente codice:

Codice sorgente - presumibilmente Visual Basic 6

  1. SELECT ... FROM Archivio WHERE Data BETWEEN #" + txtData.Text + "# AND #" + txtData2.Text + "#


Ultima modifica effettuata da il 26/02/2009 alle 19:32
PM Quote
Avatar
theprogrammer (Normal User)
Guru^2


Messaggi: 2509
Iscritto: 28/01/2009

Segnala al moderatore
Postato alle 19:33
Giovedì, 26/02/2009
Testo quotato

Postato originariamente da marco_grillo:

devi utilizzare il seguente codice:

Codice sorgente - presumibilmente Visual Basic 6

  1. SELECT ... FROM Archivio WHERE Data BETWEEN #" + txtData.Text + "# AND #" + txtData2.Text + "#




Solo se il campo nel DB e' di tipo Date (e non numerico come lo ha lui). E inoltre, Access prevede che la data sia formattata comunque nel formato mm/dd/yyyy, quindi, txtData.Text e txtData2.Text devono essere adattate ...

PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 19:36
Giovedì, 26/02/2009
il codice da me segnalato funziona al 100%, già testato..!

PM Quote
Pagine: [ 1 2 3 4 ] Precedente | Prossimo