<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)" >
&n bsp;
<!--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+
