Foros del Web » Programando para Internet » ASPX (.net) »

error en ASP

Estas en el tema de error en ASP en el foro de ASPX (.net) en Foros del Web. Gente a ver si alguien me ayuda, tengo que ahcer una busqueda por razon social y cuando ejecuto mi pagina me dice lo siguiente: Agente ...
  #1 (permalink)  
Antiguo 06/04/2010, 10:54
 
Fecha de Ingreso: abril-2010
Mensajes: 4
Antigüedad: 14 años
Puntos: 0
error en ASP

Gente a ver si alguien me ayuda, tengo que ahcer una busqueda por razon social y cuando ejecuto mi pagina me dice lo siguiente:


Agente de usuario: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; msn OptimizedIE8;ESAR)
Fecha: Tue, 6 Apr 2010 16:14:01 UTC

Mensaje: Se esperaba un objeto
Línea: 33
Carácter: 1
Código: 0
Mensaje: Se esperaba un objeto
les paso el codigo a ver si me pueden ayudar porque ya no tengo idea, me dice que es en la linea 33 que al resalto en negrita


<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="coneccion/AbrirSessiones.asp" -->
<%
session.LCID = 2057
server.ScriptTimeout = 180

Function Limpiar(dato)
dato = replace(dato,"'","")
dato = replace(dato,";","")
Limpiar = dato
End Function

Function NulosString(sString)
If (isnull(sString)) or (sString="") then
NulosString = "null"
Else
NulosString = "'" & sString & "'"
End If
End Function
seguir = false
errores = ""
mensajes = ""

sRazonSocial = Limpiar(Request.Form("RazonSocial"))

if Request.Form("buscar")<>"" then
seguir = true
if not sRazonSocial="" then
if not validarRazonSocial(sRazonSocial) then
errores=errores&"No existe Razon Social.<br />"
end if
else
errores=errores&"Debe completar la Razon Social<br />" end if
end if

%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title> Ministerio de Trabajo Pcia. de Buenos Aires </title>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />
<link href="Styles/reset-fonts-grids.css" rel="stylesheet" type="text/css">
<link href="Styles/base.css" rel="stylesheet" type="text/css">
<link href="Styles/forms.css" rel="stylesheet" type="text/css">
<script type="text/javascript" src="js/general.js"></script>
</head>

<Script Language="javascript">
function enviar(f,pag){
if (pag!='') f.action=pag;
f.submit();
}
</Script>

<Body>
<div class="content">
<form name="form" id="form" action="empresa_RazonSocial_C.asp" method="post">
<fieldset><legend>Buscar empresas por RAZON SOCIAL</legend>
<small>&nbsp;Ingrese la Razon Social.</small>
<table>
<tr>
<td>Razon Social&nbsp;:&nbsp;</td>
<td><input name="sRazonSocial" type="text" id="sRazonSocial" title="Razón social" onKeyDown="testField(event)" size="44"></td>
</tr>
</table>
</fieldset>
<div class="divBotones">
<input name="Submit" type="button" value="Buscar" onClick="grilla(1);" />
</div>
</form>
<script language="javascript" type="text/javascript">
document.getElementById('sRazonSocial').focus();
document.getElementById('sRazonSocial').select();
</script>
</form>

<%
if not errores="" then
response.Write "<div class='errores' style='300px'>"
response.Write errores
response.Write "</div>"
end if

If seguir and errores="" Then
sql = "spTR_empresa_RazonSocial '"&sRazonSocial&"'"
set rs = Conn.execute(sql)
if rs.eof then
seguir=false
response.Write "<div class='errores' style='300px'>"
response.Write "La empresa no se encuantra en el registro."
response.Write "</div>"
else
sIdEmpresa=rs("IdEmpresa")
scuit = rs("cuit")
sRazonSocial = rs("RazonSocial")
slegProvincia = rs("DomLegProvincia")
LegMunicipio = rs("domlegmunicipio")
sLegLocalidad = rs("domleglocalidad")
End if
end if
%>
</div>
</Body>
</html>
<!--#include file="Coneccion/CerrarSessiones.asp"-->


agradezco su ayuda

Etiquetas: asp, aspx
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 08:40.