Select

[Guest HAHSA]

Set rs_func = objDB.Execute("select * from fun where nome='" & X_1 & "' or nome='" & X_2 & "' or nome='" & X_3 & "' or nome='" & X_4 & "'")

TENHO ESTA CONSULTA

MATRICULA=RS_FUNC("MATRICULA")

QUERO COLOCAR EM VARIAVEIS DIFERENTES A MATRICULA REFERENTE

EX:

x_1

x_2

x_3

x_4

[fantasma]

do while not rs_func.EOF

if rs_func("nome")=x_1 then

matricula_1= rs_func("matricula")

elseif rs_func("nome")=x_2 then

matricula_2= rs_func("matricula")

elseif rs_func("nome")=x_3 then

matricula_3= rs_func("matricula")

elseif rs_func("nome")= x_4 then

matricula_4= rs_func("matricula")

end if

rs_func.movenext

loop