<% Set conn = Server.CreateObject("ADODB.Connection") conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=True;" + _ "Data Source=C:\DataBase\church1.mdb;" sql = "SELECT * FROM [SpanishChurch_In]" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 rs.AddNew If cstr(Request.Form("txt_FormType")) <> "" Then rs.Fields("txt_FormType").Value = Request.Form("txt_FormType") End If If cstr(Request.Form("txt_Congregation")) <> "" Then rs.Fields("txt_Congregation").Value = Request.Form("txt_Congregation") End If If cstr(Request.Form("txt_Address1")) <> "" Then rs.Fields("txt_Address1").Value = Request.Form("txt_Address1") End If If cstr(Request.Form("txt_Address2")) <> "" Then rs.Fields("txt_Address2").Value = Request.Form("txt_Address2") End If If cstr(Request.Form("txt_City")) <> "" Then rs.Fields("txt_City").Value = Request.Form("txt_City") End If If cstr(Request.Form("txt_State")) <> "" Then rs.Fields("txt_State").Value = Request.Form("txt_State") End If If cstr(Request.Form("txt_Zip")) <> "" Then rs.Fields("txt_Zip").Value = Request.Form("txt_Zip") End If If cstr(Request.Form("txt_Country")) <> "" Then rs.Fields("txt_Country").Value = Request.Form("txt_Country") End If If cstr(Request.Form("txt_Phone")) <> "" Then rs.Fields("txt_Phone").Value = Request.Form("txt_Phone") End If If cstr(Request.Form("txt_Email")) <> "" Then rs.Fields("txt_Email").Value = Request.Form("txt_Email") End If If cstr(Request.Form("txt_URL")) <> "" Then rs.Fields("txt_URL").Value = Request.Form("txt_URL") End If If cstr(Request.Form("txt_Member_Name")) <> "" Then rs.Fields("txt_Member_Name").Value = Request.Form("txt_Member_Name") End If If cstr(Request.Form("txt_Member_Email")) <> "" Then rs.Fields("txt_Member_Email").Value = Request.Form("txt_Member_Email") End If If cstr(Request.Form("txt_Members")) <> "" Then rs.Fields("txt_Members").Value = Request.Form("txt_Members") End If If cstr(Request.Form("SunM_Bible_Study")) <> "" Then rs.Fields("SunM_Bible_Study").Value = Request.Form("SunM_Bible_Study") End If If cstr(Request.Form("SunM_Worship")) <> "" Then rs.Fields("SunM_Worship").Value = Request.Form("SunM_Worship") End If If cstr(Request.Form("SunE_Worship")) <> "" Then rs.Fields("SunE_Worship").Value = Request.Form("SunE_Worship") End If If cstr(Request.Form("WedN_Bible_Study")) <> "" Then rs.Fields("WedN_Bible_Study").Value = Request.Form("WedN_Bible_Study") End If If cstr(Request.Form("Lad_Bible_Class")) <> "" Then rs.Fields("Lad_Bible_Class").Value = Request.Form("Lad_Bible_Class") End If if cstr(Request.Form("chk_Elders")) <> "" Then rs.Fields("chk_Elders").Value = 1 End If if cstr(Request.Form("chk_No_Elders")) <> "" Then rs.Fields("chk_No_Elders").Value = 1 End If if cstr(Request.Form("chk_Deacons")) <> "" Then rs.Fields("chk_Deacons").Value = 1 End If if cstr(Request.Form("chk_No_Deacons")) <> "" Then rs.Fields("chk_No_Deacons").Value = 1 End If if cstr(Request.Form("chk_Preacher")) <> "" Then rs.Fields("chk_Preacher").Value = 1 End If if cstr(Request.Form("chk_YMinister")) <> "" Then rs.Fields("chk_YMinister").Value = 1 End If if cstr(Request.Form("chk_Youth_Prg")) <> "" Then rs.Fields("chk_Youth_Prg").Value = 1 End If if cstr(Request.Form("chk_Evang_Prg")) <> "" Then rs.Fields("chk_Evang_Prg").Value = 1 End If if cstr(Request.Form("chk_MYouth")) <> "" Then rs.Fields("chk_MYouth").Value = 1 End If if cstr(Request.Form("chk_MLads")) <> "" Then rs.Fields("chk_MLads").Value = 1 End If if cstr(Request.Form("chk_MBible_Sch")) <> "" Then rs.Fields("chk_MBible_Sch").Value = 1 End If if cstr(Request.Form("chk_MBible_RS")) <> "" Then rs.Fields("chk_MBible_RS").Value = 1 End If if cstr(Request.Form("chk_MPrison")) <> "" Then rs.Fields("chk_MPrison").Value = 1 End If if cstr(Request.Form("chk_MRadio")) <> "" Then rs.Fields("chk_MRadio").Value = 1 End If if cstr(Request.Form("chk_MTV")) <> "" Then rs.Fields("chk_MTV").Value = 1 End If if cstr(Request.Form("chk_MInternet")) <> "" Then rs.Fields("chk_MInternet").Value = 1 End If if cstr(Request.Form("chk_MUniversity")) <> "" Then rs.Fields("chk_MUniversity").Value = 1 End If If cstr(Request.Form("txt_Preacher")) <> "" Then rs.Fields("txt_Preacher").Value = Request.Form("txt_Preacher") End If If cstr(Request.Form("txt_YMinister")) <> "" Then rs.Fields("txt_YMinister").Value = Request.Form("txt_YMinister") End If If cstr(Request.Form("cmt_Notes")) <> "" Then rs.Fields("cmt_Notes").Value = Request.Form("cmt_Notes") End If rs.Update rs.Close conn.Close Set rs = Nothing Set conn = Nothing %>
Inicio Anuncios Directorios Estudios Bíblicos Sermones Hospedaje Virtual

 

Directorio Mundial de las Iglesias de Cristo

Instrucciones del Pago

 

  Sitios de Web económicos que incluyen su propio Nombre de Dominio al costo de $4.95 por mes(Programado en español)

Esta oferta es exclusivamente hecho a todas las iglesias de Cristo y sus ministerios. 

Gracias <%=Request.Form("txt_Member_Name")%>  (Email: <%=Request.Form("txt_Member_Email")%>) por someter su información a nuestro Directorio Mundial de las iglesias de Cristo.  Su pago nos ayudará a continuar este valioso servicio para las iglesias de Cristo alrededor del mundo.

<%=Request.Form("txt_Congregation")%>
<%=Request.Form("txt_Address1")%>
<%=Request.Form("txt_Address2")%>
<%=Request.Form("txt_City")%> <%=Request.Form("txt_State")%>  <%=Request.Form("txt_Zip")%>
<%=Request.Form("txt_Country")%>
Teléfono: <%=Request.Form("txt_Phone")%>
Email: <%=Request.Form("txt_Email")%>

Este aviso sirve como nuestra factura a usted.

Nuestros directorios se ponen al día semanalmente.

El fracaso de pagar este aviso generará una factura que se mandará por correo a la  dirección su iglesia.

Por favor mande por correo y haga su cheque de $25.00 (Dólares americanos) pagable a:

Internet Ministries
P.O. Box 832
Burley, Idaho 83318

 

Usted también tiene la opción de hacer su pago por tarjeta de crédito en el Internet vía un servidor seguro de PayPal.com.  Haga clic en el logotipo de PayPal para hacer el pago con su tarjeta de crédito.  (Este enlace está en inglés)

 

email.gif (15369 bytes)  Puede dirigir sus preguntas o comentarios a: garcia@iglesia-de-cristo.org


Volver a la Iglesia de Cristo

Copyright © 1995 - 2014  Internet Ministries.
Reservados todos los derechos.