Problems with string and integer

Please take look:

if qry is string

Dim qry As String

adodc1.recordsource = "Select * from myfile where name = . . . .

if qry is integer

Dim qry As Integer

adodc1.recordsource = "Select * from myfile where codname = . . .

can someone complete the select

TIA

[Edited by JuanCarlos60 on 11-07-2000 at 09:55 AM]