Foros del Web » Programando para Internet » ASP Clásico »

por favor ayuda estoy en problemas

Estas en el tema de por favor ayuda estoy en problemas en el foro de ASP Clásico en Foros del Web. <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Pagina nueva 1</title> <!-- Creacion de Funcion para buscar el dato a traves del Rut del Cliente --> <script ...
  #1 (permalink)  
Antiguo 18/07/2008, 18:11
 
Fecha de Ingreso: julio-2008
Mensajes: 5
Antigüedad: 16 años, 7 meses
Puntos: 0
Exclamación por favor ayuda estoy en problemas

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Pagina nueva 1</title>
<!-- Creacion de Funcion para buscar el dato a traves del Rut del Cliente -->
<script type="text/javascript">
function BuscarCliente()
{
rutc.value = obj.value;
var accion = "manclientes.asp?rutc="+rutc.value;
window.document.FrontPage_Form1.action = accion;
window.document.FrontPage_Form1.target="_self";
dato = self.document.FrontPage_Form1.submit()
<%
Dim bdd
Dim rs
Dim variable,varnombre
Dim SQL
Set bdd = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set bdd = Server.CreateObject("ADODB.Connection")
bdd.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("latino.mdb"))
SQL = "SELECT * FROM clientes WHERE rutcliente = " & dato & " "
Set rs = bdd.Execute(SQL)
varnombre = rs("razonsocial")
variable = rs("rutcliente")
%>
// Resulta que cuando es numerico pasa sin comillas y cuando es texto con comillas //
// Aqui asigno a los campos para qe se vean en el formulario
document.FrontPage_Form1.T1.value = <%= variable %>
document.FrontPage_Form1.nombrec.value = "<%= varnombre %>"
}
</script>
</head>
<body>
<form name= "FrontPage_Form1" method="POST" action="--WEBBOT-SELF--" onsubmit="return FrontPage_Form1_Validator(this)" >
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<!--webbot bot="Validation" s-data-type="Integer" s-number-separators="." -->
<input type="text" name="rutc" size="20" onclick = "javascript:BuscarCliente(this.form)">
<input type="text" name="nombrec" >
<input type="text" name="T1" size="20"><br>
</p>
</form>
</body>
</html>

POR FAVOR AYUDA TENGO PROBLEMAS ESTOY TRATANDO DE HACER UN FORMULARIO QUE RECIBE UN DATO A TRAVES DE UNA TEXTBOX EL CUAL AL HACER UN CLICK VALLA A UN RUTINA QUE LO BUSQUE A TRAVES DE UNA SELECT Y DESPLIEGUE LOS DATOS EN EL MISMO FORMULARIO

EL PROBLEMA QUE AL EJECUTARLO ME SALE EL SIGUIENTE ERROR

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta 'rutcliente ='.
/latinobeta/ManClientes.asp, línea 29
  #2 (permalink)  
Antiguo 18/07/2008, 19:00
Avatar de Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años
Puntos: 88
Respuesta: por favor ayuda estoy en problemas

la aplicacion esta incorrecta...., no puede realizar una consulta si cuando cargas la pagina, no contiene datos a buscar
Cita:
<%
if dato<>"" then
Dim bdd
Dim rs
Dim variable,varnombre
Dim SQL
Set bdd = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set bdd = Server.CreateObject("ADODB.Connection")
bdd.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("latino.mdb"))
SQL = "SELECT * FROM clientes WHERE rutcliente = " & dato & " "
Set rs = bdd.Execute(SQL)
varnombre = rs("razonsocial")
variable = rs("rutcliente")
end if
%>
intentalo nuevamente y comenta
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra
  #3 (permalink)  
Antiguo 19/07/2008, 15:58
 
Fecha de Ingreso: julio-2008
Mensajes: 5
Antigüedad: 16 años, 7 meses
Puntos: 0
Respuesta: por favor ayuda estoy en problemas

<html>
<head>


<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Pagina nueva 1</title>
<!-- Creacion de Funcion para buscar el dato a traves del Rut del Cliente -->

<script type="text/javascript">

function BuscarCliente()
{
dato = document.FrontPage_Form1.nombrec.value
<%
if isnull(dato) = false then
Dim bdd
Dim rs
Dim variable,varnombre
Dim SQL
Set bdd = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set bdd = Server.CreateObject("ADODB.Connection")
bdd.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("latino.mdb"))
SQL = "SELECT * FROM clientes WHERE rutcliente = " & dato & " "
Set rs = bdd.Execute(SQL)
varnombre = rs("razonsocial")
variable = rs("rutcliente")
End if
%>
// Resulta que cuando es numerico pasa sin comillas y cuando es texto con comillas //
// Aqui asigno a los campos para qe se vean en el formulario
document.FrontPage_Form1.T1.value = <%= variable %>
document.FrontPage_Form1.nombrec.value = "<%= varnombre %>"
}


</script>
</head>




<body>
<form name= "FrontPage_Form1" method="POST" action="--WEBBOT-SELF--" onsubmit="return FrontPage_Form1_Validator(this)" >
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n bsp;&nbsp;&nbsp;&nbsp;&nbsp;
<!--webbot bot="Validation" s-data-type="Integer" s-number-separators="." -->
<input type="text" name="rutc" size="20" onclick = "javascript:BuscarCliente(this.form)">
<input type="text" name="nombrec" >
<input type="text" name="T1" size="20"><br>
</p>
</form>

</body>

</html>

Bien cambie el codigo pero me aparece lo siguiente al ejecutar la pagina
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta 'rutcliente ='.
/latinobeta/ManClientes.asp, línea 25


AGRADEZCO ENORMEMENTE TU AYUDA MUCHAS GRACIAS+
  #4 (permalink)  
Antiguo 19/07/2008, 17:58
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 21 años, 4 meses
Puntos: 27
Respuesta: por favor ayuda estoy en problemas

Como estas PERDIDOASP

sabias tu que el maestro te dijo
if dato<>"" then

y tu pusiste IsNull y que esas son dos cosas diferentes?




y negus leí por ahí en un pos

http://www.forosdelweb.com/f29/valid...5/#post1138340

RUT : Rol Unico Tributario
consta de varios dígitos mas un dígito verificador 99999999-X
el dígito verificador puede ser números de 0 - 9 o la letra K


eso quiere decir que tu SQL tiene que recibir dato como un string asi que te faltan las comillas simples para validar dato



SQL = "SELECT * FROM clientes WHERE rutcliente = '"& dato &"'"


suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #5 (permalink)  
Antiguo 22/07/2008, 16:01
 
Fecha de Ingreso: julio-2008
Mensajes: 5
Antigüedad: 16 años, 7 meses
Puntos: 0
Respuesta: por favor ayuda estoy en problemas

<html>
<head>


<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Pagina nueva 1</title>
<!-- Creacion de Funcion para buscar el dato a traves del Rut del Cliente -->

<script type="text/javascript">

function BuscarCliente(dato)
{
//location.hash='?+var=' + dato//
location.href= "?alfa="+dato;
<%
if Request.QueryString("alfa")<>"" then
Dim bdd
Dim rs
Dim variable,varnombre,runingresado
Dim Variab2
Dim SQL
runingresado=Request.QueryString("alfa")
Set bdd = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set bdd = Server.CreateObject("ADODB.Connection")
bdd.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("latino.mdb"))
SQL = "SELECT * FROM clientes WHERE rutcliente = " & runingresado & " "
Set rs = bdd.Execute(SQL)
varnombre = rs("razonsocial")
variable = rs("rutcliente")
Else
Variab2 = "nooooooooooo ENTRO AL IF"

End if
%>
// Resulta que cuando es numerico pasa sin comillas y cuando es texto con comillas //
// Aqui asigno a los campos para qe se vean en el formulario
document.FrontPage_Form1.T1.value = <%= variable %>
document.FrontPage_Form1.nombrec.value = "<%= varnombre %>"
document.FrontPage_Form1.T2.value = "<%= Variab2 %>"
}


</script>
</head>
<body>
<form name= "FrontPage_Form1" method="POST" action="--WEBBOT-SELF--" onsubmit="return FrontPage_Form1_Validator(this)" >
<!--webbot bot="Validation" s-data-type="Integer" s-number-separators="." -->
<input type="text" name="rutc" size="20" ondblclick = "javascript:BuscarCliente(rutc.value)">
<input type="text" name="nombrec" >
<input type="text" name="T1" size="20"><input type="text" name="T2" size="20"><br>
</p>
</form>

</body>

</html>


BIEN E MODIIFICADO ALGUNAS COSAS , PRIMERO LA ESTRUCTURA DE LA BASE, ME FUNCIONA AHORA, SIN EMBARGO HAY UN PROBLEMA ME MUESTRA LOS DATOS DEL CLIENTE , PERO SE BORRAN LOS DATOS QUE CARGO EN LAS TEXTBOX , LE SACO LA LINEA DE LOCATION Y ME FUNCIONA QUE ESTOY HACIENDO MAL MUCHAS Y MUCHAS GRACIAS POR SU AYUDA
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 16:45.