<% ' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit. On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 1252 Err.Clear strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("inscripcion_gangas_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "Results", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(6) Dim arFormDBFields0(6) Dim arFormValues0(6) arFormFields0(0) = "Validez" arFormDBFields0(0) = "Validez" arFormValues0(0) = Request("Validez") arFormFields0(1) = "Empresa" arFormDBFields0(1) = "Empresa" arFormValues0(1) = Request("Empresa") arFormFields0(2) = "Telefono" arFormDBFields0(2) = "Telefono" arFormValues0(2) = Request("Telefono") arFormFields0(3) = "Nombre_responsable" arFormDBFields0(3) = "Nombre_responsable" arFormValues0(3) = Request("Nombre_responsable") arFormFields0(4) = "Descripcion_Oferta" arFormDBFields0(4) = "Descripcion_Oferta" arFormValues0(4) = Request("Descripcion_Oferta") arFormFields0(5) = "Email_responsable" arFormDBFields0(5) = "Email_responsable" arFormValues0(5) = Request("Email_responsable") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type" End If If Request.ServerVariables("REMOTE_HOST") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name" End If FP_SaveFieldToDB fp_rs, Now, "Timestamp" If Request.ServerVariables("REMOTE_USER") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name" End If fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close Session("FP_SavedFields")=arFormFields0 Session("FP_SavedValues")=arFormValues0 Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") Response.Redirect "confirmacion_gangas.htm" End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> Publicacion de GANGAS y OFERTAS en Guatebodas.com
 

El directorio para Bodas de Guatemala

  
 inicio     fotos de bodas      vestidos de novia      directorio    inscripción de novios       inscripción de empresas 

 

  

 

  

Publicación de Gangas y Ofertas

Advertencia: Guatebodas.com  no es responsable por el contenido de las ofertas y promociones. Este es un servicio para empresas que desean publicar de una manera gratuita sus promociones y ofertas. Guatebodas.com no puede garantizar exclusividad ni tiempo que estarán publicadas las ofertas.

Empresa

 

Nombre del Negocio

 

  
Nombre Persona Responsable

 

Ingresar aqui, el nombre de la persona que publica la oferta

 

  
Email Contacto

 

Email de la Persona que Publica la Oferta

 

  
Teléfono para alcarar dudas de la oferta

 

A este telefono, los novios podrán aclarar dudas de la promoción.

 

  
Descripción de la Oferta o Promoción

 

Ejemplo: "Durante Diciembre, obtendras 10% de descuento en vestidos de novia"

 

  
Validez de la Oferta

 

Toda oferta debe tener tiempo de validez.

 

  

 
 

www.guatebodas.com

El Directorio de Bodas Oficial de Guatemala

 

Derechos Reservados. Prohibida la reproducción Parcial o Total del contenido de este website

Desarrollado y Mantenido por Guatebodas de Guatemala

2009

 

Dudas o Comentarios?  CONTACTANOS

  
 

 

administracion            mail login

 

http://www.grangalagt.com  vestidos de novia guatemala