PASSAR SOURCE DE CONSULTA

USUARIO.EXCLUIDOS 21/11/2006 10:14:02
#185511
Putz galera nem sei nomear minha duvida, mas é a seguinte:

tenho uma consulta no DB

Set DB = New ADODB.Connection

DB.CursorLocation = adUseClient
DB.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=db.mdb;"

Set tabela = New Recordset
tabela.Open "SELECT * FROM tabela", DB

grid.datasource = tabela

beleza preenchi o grid com o resultado da consulta, mas agora queria fazer isso como uma função tipo


function consulta()

    Set DB = New ADODB.Connection

    DB.CursorLocation = adUseClient
    DB.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=db.mdb;"
       
    Set tabela = New Recordset
    tabela.Open "SELECT * FROM tabela", DB

    consulta =[txt-backcolor=#ff0000] tabela[/txt-backcolor]

end Function



dai não consigo retornar o TABELA, alguem saberia me explicar como pego o resultado dessa consulta dentro da função?


valeu, espero ter conseguido ser claro...
USUARIO.EXCLUIDOS 21/11/2006 10:32:55
#185516
function consulta() as adodb.recordset

...

set consulta = tabela

...

end function
USUARIO.EXCLUIDOS 21/11/2006 11:00:08
#185522
não consigo...

to fazendo isso, o que tá errado?


function consulta()as adodb.recordset 

    Set DB = New ADODB.Connection

    DB.CursorLocation = adUseClient
    DB.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=db.mdb;"
       
    Set tabela = New Recordset
    tabela.Open "SELECT * FROM tabela", DB

    set consulta = tabela

end Function



'Dai no botão coloco

set grid.datasource = consulta
'da um erro: gird dont suport the requested type of data binding


'asim
grid.datasource = consulta
'erro: method or data not found
Tópico encerrado , respostas não são mais permitidas
Voltar