PDA

View Full Version : ASP - Database!!!


BZ8
14-02-2002, 10:23
scusate la domanda forse stupida.... ma come faccio ad ordinare un database di acces per più di un campo? es. ho un db con i campi cognome e nome.
voglio visualizzarli in ordine di cognome e di nome
come si fa?

grazie a tutti

tanolalano
14-02-2002, 10:34
Nella riga di comando Sql devi aggiungere:
"ORDER BY Cognome And Nome"

Ciap!!!

BZ8
14-02-2002, 10:38
Uffa non mi funziona (in effetti avevo già provato così)

i campi sul db access li ho messi tutti e due indicizzati ma ho notato che me li ordina solo per l'ultimo campo che gli metto

aiuto!!!!!!

grazie

tanolalano
14-02-2002, 10:49
Incolla la riga SQL e così vediamo insieme :)

BZ8
14-02-2002, 10:52
If cFlRagg = "G" Then
cOrd = " order by DataApp"
Else
cOrd = " order by IdMedico AND DataApp AND OraApp"
End If

Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("data/ambulatori.mdb")

Dim rsApp
Set rsApp = Server.CreateObject("ADODB.Recordset")
rsApp.Open "select * from Appuntamenti"&cOrd, conn

BZ8
14-02-2002, 10:55
è un prg per gestire gli appuntamenti di un ambulatorio
devo visualizzare gli appuntamenti per giorno e per medico
nel caso dell'ordinamento per giorno faccio un gruppo sulla data
nel caso del medico faccio un gruppo sul medico e ordino i suoi appuntamenti per data ed ora.

I campi sono IdMedico, DataApp e OraApp

If cFlRagg = "G" Then
cOrd = " order by DataApp AND OraApp"
Else
cOrd = " order by IdMedico AND DataApp AND OraApp"
End If

Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("data/ambulatori.mdb")

Dim rsApp
Set rsApp = Server.CreateObject("ADODB.Recordset")
rsApp.Open "select * from Appuntamenti"&cOrd, conn


se mi sei di aiuto grazie tante

tanolalano
14-02-2002, 11:05
If cFlRagg = "G" Then
cOrd = "ORDER BY DataApp AND OraApp"
Else
cOrd = "ORDER BY IdMedico AND DataApp AND OraApp"
End If

Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("data/ambulatori.mdb")

Dim rsApp
Set rsApp = Server.CreateObject("ADODB.Recordset")
rsApp.Open "select * from Appuntamenti" & "cOrd", conn

Prova così...

altrimenti
rsApp.Open "select * from Appuntamenti & cOrd", conn

BZ8
14-02-2002, 11:10
non va, non so che dire
se hai altre idee fammi sapere
grazie per ora

tanolalano
14-02-2002, 11:14
ma ti ordina sempre per l'ultimo campo?

BZ8
14-02-2002, 11:19
no, nel caso della data me li ordina solo x data e non per ora
nel caso del medico mi fa un fritto generale in cui mette i records un po' a caso

bohhhh????

tanolalano
14-02-2002, 11:24
ultima cosa che mi viene in mente....

nella select invece di mettere "*" prova a mettere tutti i campi che ti interessano.....di + per ora non mi viene in mente nulla :))

BZ8
14-02-2002, 11:34
non è cambiato un tubo
cmq ti ringrazio x ora
c

lufo
14-02-2002, 14:13
tu hai scritto:
"ORDER BY IdMedico AND DataApp AND OraApp"

ma la sintassi corretta è:

"ORDER BY IdMedico, DataApp, OraApp"

Ciao! ;)

tanolalano
14-02-2002, 18:03
Porca miseria...:)

Sorry ma molto probabilmente mi ero confuso con la Clausola WHERE ....AND :)