<%
Response.Buffer = true
dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open "DRIVER={Microsoft Access DRIVER (*.mdb)}; DBQ=" & Server.MapPath("sanclemente.mdb")
sqltext = "SELECT * FROM ingresar_ot"
rst.Open sqltext,cnn,3,3
'n_ot=Request.form("n_ot")
fecha_ingreso=Request.form("fecha_ingreso")
rut_cliente=Request.form("rut")
dv_cliente=Request.form("dv")
fecha_cierre=Request.form("fecha_cierre")
nombres=Request.form("nombres")
apellidos=Request.form("apellidos")
Correo=Request.form("correo")
telefono=Request.form("telefono")
Cargo=Request.form("cargo")
recurso_asignado=Request.form("recurso_asignado")
estado_ot=Request.form("estado_ot")
departamento=Request.form("departamento")
anexo=Request.form("anexo")
descripcion_problema=Request.form("descripcion_pro blema")
prioridad=Request.form("prioridad")
if fecha_ingreso = "" or rut_cliente ="" or dv_cliente ="" or fecha_cierre ="" or nombres="" or apellidos="" or correo="" or telefono="" or cargo="" or recurso_asignado="" or estado_ot="" or departamento="" or anexo="" or descripcion_problema="" or prioridad="" then
error = "Debe completar todos los datos."
Response.Write error
Response.End
end if
'Si está todo correcto, procedemos a ingresar los datos a la base de datos
rst.AddNew
rst("fecha_ingreso") = fecha_ingreso
rst("rut_cliente") = rut_cliente
rst("dv_cliente") = dv_cliente
rst("fecha_cierre")=fecha_cierre
rst("nombres")=nombres
rst("apellidos")=apellidos
rst("Correo")=Correo
rst("telefono")=telefono
rst("Cargo")=Cargo
rst("recurso_asignado")=recurso_asignado
rst("estado_ot")=estado_ot
rst("departamento")=departamento
rst("anexo")=anexo
rst("descripcion_problema")=descripcion_problema
rst("prioridad")=prioridad
rst.update
'Terminamos e imprimimos un mensaje
Response.Write "Los Datos Fueron Guardados Con Exito"
%>
hola estos son los datos q guardo en la base de dato
ahora al momento de enviar los datos a la base debe mandarse un mail automaticamente
a unos correos fijos ej: basti_:
[email protected] [email protected]
y deven enviarle todos los datos q se guardan en la base de datos a esos correos
no se si se entiene
porfa si me lo puedes ahcer garacias
ayuada plizzzzzzzzzzzzz