<%@LANGUAGE="VBSCRIPT"%> <% function TestCaptcha(byval valSession, byval valCaptcha) dim tmpSession valSession = Trim(valSession) valCaptcha = Trim(valCaptcha) if (valSession = vbNullString) or (valCaptcha = vbNullString) then TestCaptcha = false else tmpSession = valSession valSession = Trim(Session(valSession)) Session(tmpSession) = vbNullString if valSession = vbNullString then TestCaptcha = false else valCaptcha = Replace(valCaptcha,"i","I") if StrComp(valSession,valCaptcha,1) = 0 then TestCaptcha = true else TestCaptcha = false end if end if end if end function %> COCENSA - Contacto


DIRECCION

Central El Palmar, S.A.
Carretera Nacional San Mateo - La Encrucijada Km. 96.
San Mateo, Estado Aragua.
Venezuela.
Cód. Postal: 2120

EMAIL

mercadeo.cocensa@elpalmar.com.ve

TELEFONOS

Central: (0244) 390.10.00
Fax: (0244) 390.10.88 / 10.87

COMENTARIOS

<% if not IsEmpty(Request.Form("btnTest")) then Response.Write("" & vbCrLf) end if %>
Nombre:

Compañia:
Teléfono:
Email:
Comentarios y/o preguntas:
Introduzca el texto que observa en la imagen:

Restaurar Imagen
") if TestCaptcha("ASPCAPTCHA", Request.Form("captchacode")) then Response.Write("The code you enter verified.") else Response.Write("No coinciden el códigos.") end if Response.Write("