Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Ordinare una tabella in vb6

3 views
Skip to first unread message

Luigi

unread,
Nov 13, 2009, 8:27:04 AM11/13/09
to
Ciao a tutti,
vorrei ordinare una tabella di un mdb da codice vb6 con DAO secondo un campo
(per es cognome).
Se imposto la SQL mi da errore dicendo che non posso eseguire una query di
selezione.
Come posso superare il problema?

Grazie

GbC

unread,
Nov 13, 2009, 12:33:27 PM11/13/09
to

facci almeno vedere il pezzo di codice incriminato

--

-> GbC|
www.gbcweb.com
www.chiappori.com


VincePik

unread,
Nov 13, 2009, 3:58:52 PM11/13/09
to
"GbC" <use...@gbcweb.com> ha scritto nel messaggio
news:4afd9866$0$6839$5fc...@news.tiscali.it...

> Luigi wrote:
>> Ciao a tutti,
>> vorrei ordinare una tabella di un mdb da codice vb6 con DAO secondo
>> un campo (per es cognome).
>> Se imposto la SQL mi da errore dicendo che non posso eseguire una
>> query di selezione.
>> Come posso superare il problema?
>>
>> Grazie
>
> facci almeno vedere il pezzo di codice incriminato
>

Eh no! Se ti fa vedere il codice � troppo facile! ;-)

Ciao, Vincenzo


Paperino

unread,
Nov 13, 2009, 4:05:20 PM11/13/09
to
"VincePik" ha scritto
> "GbC" ha scritto

>> Luigi wrote:
>>> Ciao a tutti,
>>> vorrei ordinare una tabella di un mdb da codice vb6 con DAO secondo
>>> un campo (per es cognome).
>>> Se imposto la SQL mi da errore dicendo che non posso eseguire una
>>> query di selezione.
>>> Come posso superare il problema?
>> facci almeno vedere il pezzo di codice incriminato
> Eh no! Se ti fa vedere il codice � troppo facile! ;-)

E poi, cos�, davanti a tutti, un po' di pudore...

Bye, G.

andrea palazzi

unread,
Nov 13, 2009, 6:19:16 PM11/13/09
to

"Luigi" <l.batt...@cartorange.com> ha scritto

senza sapere che codice usi � difficile indovinare, ma probabilmente aprendo
la tabella come dynaset

questo codice d� errore

Private Sub Command1_Click()
Dim db As Database
Dim rs As Recordset
Dim s As String
s = "select opera from tabella order by opera"
Set db = OpenDatabase(App.Path & "\web.mdb")
Set rs = db.OpenRecordset(s, dbOpenTable)
Set Data1.Recordset = rs
End Sub

ma se metti

Set rs = db.OpenRecordset(s, dbOpenDynaset)

l'errore non lo d�

se stai facendo una query sul data1.recordset e l'hai settato a 0-table
anzich� 1-dynaset, direi ti crei lo stesso problema. ma non ho provato
molto.

ciao


0 new messages