Bueno, entonces probá de esta manera:
Código:
<%do while not rs_cur.eof%>
<% set rs_graba=createobject("ADODB.Recordset")
sqltxt3="INSERT INTO S_A_WWW_LLAVE VALUES('" &exp0& "','" &exp1& "',000101,'" &oacod& "','"&fcode&"','"&exp2&"','"&llave&"',0)"
rs_graba.open sqltxt3,"DSN=xxx;PWD=xxx"
set rs_graba = nothing
rs_graba.close
%>
<%
rs_cur.movenext
loop
%>
Pero me parece una paparruchada crear un recordset para hacer un insert.