EUREKA!! U're sooo kewl!

Thanks for posting out the adUseClient note because that's the solution.
Here's the full code for reference:
CONN_STRING = "DSN=workdsn;"
Set Conn_Informix = Server.CreateObject("ADODB.Connection")
Conn_Informix.Open CONN_STRING
qwe1="select desc from texttabel"
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.CursorLocation = 3 'JUST NEED THIS!!!
rs1.open qwe1,conn_informix
'set rs1=Conn_Informix.Execute(qwe1)
while not rs1.eof
label = rs1.FIELDS("desc").value
response.write label
rs1.movenext
wend
I wish the support that i get from the paid ones is like this. Informix put the blame on microsoft, and microsoft blames informix. In the end, a huge egg on the forehead. Thanks again sir!