Grabar mas de un sql.

[carlunchos]

Que tal sres. Foreros:
Tengo en un form1 y en el 2 tablas de 1 rowx5columns cada una. La idea es que los nombres de las columnas son las mismas para los 2 rows pero los valores de las celdas son distintos. Por ende escribi 2 sql:
sqlagrega1
sqlagrega2

Lo idspuse asi:
if num1<>"" then

set rst = Server.CreateObject("ADODB.Recordset")
sqlnum="select * from Consulta1 where NFact="&nfac
rst.open sqlnum, strProvider

set rst = Server.CreateObject("ADODB.Recordset")
sqlagrega1="Insert Into domicilios1(NFact,num, codcalle, prov, local, calle, numpol, depto) Values ("&nfac&", "&num1&", '"&codcalle1&"', '"&prov1&"', '"&local1&"', '"&calle1&"', "&numpol1&", '"&depto1&"')"
rst.open sqlagrega1 ,strProvider, adOpenDynamic, adLockReadOnly, adCmdText
end if

if num2<>"" then

set rst = Server.CreateObject("ADODB.Recordset")
sqlnum="select * from Consulta1 where NFact="&nfac
rst.open sqlnum, strProvider

set rst = Server.CreateObject("ADODB.Recordset")
sqlagrega2="Insert Into domicilios1(NFact,num, codcalle, prov, local, calle, numpol, depto) Values ("&nfac&", "&num2&", '"&codcalle2&"', '"&prov2&"', '"&local2&"', '"&calle2&"', "&numpol2&", '"&depto2&"')"
rst.open sqlagrega2, strProvider, adOpenDynamic, adLockReadOnly, adCmdText
end if

pero solo me guarda los datos del primer row (sqlagrega1).

Como deberia ser el codigo para que guarde los 2 insert into?

Gracias.

[lubetpic]

grava el 1 porque la condicion if asi lo dice, si quieres que te grave las dos siempre, quitale los if

[carlunchos]

Estimado Lubetpic:
Si bien es cierto lo que decis , tambien es cierto que debo fijarme si la primer celda de cada row contiene algo, si contiene debe grabar, sino no.

Alguna otra sugerencia?

[carlunchos]

Solucionado lo de insertar datos con mas de un sql en la misma pagina.
Gracias por responder.