erro sql

[Gustavo Moraes]

Olá pessal, já quebrei muito a cabeça e não consigo corrigir esse sql:

var_codigo = Request.Form("codigo")
Const intPageSize = 5

If Request.Querystring = "" then
    intCurrentPage = 1
Else
    intCurrentPage = CInt(Request.Querystring("CurrentPage"))
    Select Case Request.Querystring("Submit")
        Case "Previous"
            intCurrentPage = intCurrentPage -1
        Case "Next"
            intCurrentPage = intCurrentPage +1
        End Select
End If


Set exe = Server.CreateObject("ADODB.Recordset")
exe.CursorLocation = adUseClient
exe.CursorType = adOpenStatic
exe.CacheSize = intPageSize

sql = "SELECT * FROM cadastro WHERE id = '"& var_codigo &"'"
exe.Open sql, conexao, adCmdText

exe.PageSize = intPageSize
If Not(exe.EOF) Then exe.AbsolutePage = intCurrentPage

intTotalPages = exe.PageCount

na linha do exe.open

da o o seguinte erro:

Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/class/resultado2.asp, line 139

Agradeço qualquer ajuda!!! OBrigado

[bareta]

aonde isso ta definidio adCmdText???

o campo id é do tipo texto mesmo?

[Gustavo Moraes]

tem razao, o id é do tipo auto-numerico, mas tipo, eu to usando uma paginação q não deixa eu usar qualquer tipo de select, o q eu poderia colocar no lugar de adCmdText , como ficaria o SQL para o id então? pls! ,

valeu brigadao ae