Como lo hago

[M@uR0]

Hola Amigos..
Estoy haciendo un mantenedor, para un sistema de nacimientos, ingreso todos los datos del bebe y 1 foto, con AspUpload sube la imagen a una carpeta especifica del servidor y guarda el nombre de la imagen en un campo del registro, todo bien
Yo quisiera agregar 2 fotografias (Una foto chica y una grande) en vez de una sola, pero no se como hacerlo, se que deberia agregar otro campo a la tabla de la Bd, pero no se como debo manejar de forma separada los dos datos tipo "FILE".

Consulta: Con el "Upload.SaveVirtual "../mantencion/upload/"" creo que guardaria las imagenes en la carpeta..
Deberia hacer un :

Set File = Upload.Files("file")
Set File1 = Upload.Files("file1")

' Siendo file y file1 los datos tipo FILE que vienen del formulario
para manejar los 2 datos tipo file??

y despues del .addnew
rs("foto") = File.FileName
rs("foto1") = File1.FileName
' Siendo foto y foto1 los 2 campos foto de la tabla
Si coloco esto haria lo que quiero??

aqui les dejo el codigo del registro con una foto (A mi me funciona perfecto en el servidor con los respectivos permisos de escritura)

<%
Set Upload = Server.CreateObject("Persits.Upload.1")

Upload.OverwriteFiles = False
Upload.SetMaxSize 1048576
Upload.SaveVirtual "../mantencion/upload/"

Set File = Upload.Files("file")
If Not File Is Nothing Then
con = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("clinica.mdb")
Set rs = Server.CreateObject("adodb.recordset")
SQL = "SELECT * FROM bebes"
rs.Open SQL, con, 2 ,3
rs.AddNew
rs("foto") = File.FileName
rs("nombres") = Upload.Form("nombres")
rs("apellidos") = Upload.Form("apellidos")
rs("nom_padre") = Upload.Form("n_padre")
rs("nom_madre") = Upload.Form("n_madre")
rs("fecha_nac") = Upload.Form("nacim_fecha")
rs("hora_nac") = Upload.Form("nacim_hora")
rs("peso") = Upload.Form("peso")
rs("altura") = Upload.Form("altura")
rs("sexo") = Upload.Form("sexo")
rs.Update

rs.Close
con.Close
set rs=nothing
set con=nothing
Response.Redirect "confirma.htm"
Else
Response.Redirect("add_bebes.htm")
End If
%>