Estimados amigos,
He insertado este código en mi página principal; ella me envía al buscador Google. No obstante, siempre me busca en la Web y no en mi página; desearía que me buscara en mi página por defecto. ¿Qué debo hacer?
<%keywordsinput=request("keywords")%><FORM method=GET name="buscador" action=../googleapi/buscadorGOOGLE_l.asp>
<A HREF=http://www.google.com/> <IMG SRC="../images/google.gif" border=0
ALT=Google>
<INPUT onblur="if(this.value=='')this.value='publicidad'; " onfocus="if(this.value=='publicidad')this.value='' ;" name="keywords" TYPE=text class="cajatextosinfondo" value="publicidad" size=15 maxlength=100>
<input type="hidden" name="h" value="0">
<INPUT type=submit class="c" VALUE="Buscar">
</FORM>
El código de la página "buscadorGOOGLE_l.asp" es la que habéis dejado para descargar.
::::::buscador GOOGLE_l.asp:::::::: un extracto ...
<%
// -= Ch0rOy =- Buscador Web mediante API's Google
//
// Este codigo es LIBRE y puedes distribuirlo y/o modificarlo libremente.
// Lo unico que pido es que no borres esto si lo vas a distribuir.
//
// Esta basado en otros codigos que circulan por la red, pero que,
// por lo menos a mi no me funcionaban.
// Y extraido de mi pagina web
www.caravacaonline.net para mis amigos
// de
www.forosdelweb.com, una gran comunidad sin la que seguro que no
// sabria lo que se.
//
//
//
[email protected]
%>
<html>
<head>
<title>::. Google .::</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="/css/index.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF">
<p align="left"><br><br><br>
<%keywords=request.querystring("keywords")
keywords=Replace(keywords,"á","a")
keywords=Replace(keywords,"é","e")
keywords=Replace(keywords,"í","i")
keywords=Replace(keywords,"ó","o")
keywords=Replace(keywords,"ú","u")
keywords=Replace(keywords,"ñ","n")
keywords=Replace(keywords,"Á","A")
keywords=Replace(keywords,"É","E")
keywords=Replace(keywords,"Í","I")
keywords=Replace(keywords,"Ó","O")
keywords=Replace(keywords,"Ú","U")
keywords=Replace(keywords,"Ñ","N")
if keywords="" then%>
<form method=get action=<% =request.servervariables("URL") %> name="buscador">
<input type="text" name="keywords" size="50">
<input type="hidden" name="h" value="0">
<input type="submit" value="Búsqueda"> <br>
<p style="margin-top: 0; margin-bottom: 0" class="negro">
<input type="radio" name="opc" value="web" checked>
En esta web
<input type="radio" name="opc" value="all">
En Internet
<input type="radio" name="opc" value="spa">
Páginas en español</p><br><br>
<hr>
<b><p class="imenterojo">Introduzca en el formulario de arriba los criterios de búsqueda.</p></b>
<%else
opc=Request("opc")
if opc="" then opc="all"
keywordsinput=request("keywords")
keywordsinput=Replace(keywordsinput,CHR(34),"" ;")%>
<form method=get action=<% =request.servervariables("URL") %> name="buscador">
<input type="text" name="keywords" size="50" value="<%= keywordsinput %>">
<input type="hidden" name="h" value="0">
<input type="submit" value="Búsqueda"> <br>
<p style="margin-top: 0; margin-bottom: 0" class="negro">
<input type="radio" name="opc" value="web" <%if opc="web" then%>checked<%end if%>>
En esta web
<input type="radio" name="opc" value="all" <%if opc="all" then%>checked<%end if%>>
En Internet
<input type="radio" name="opc" value="spa" <%if opc="spa" then%>checked<%end if%>>
Páginas en español</p><br><br>
</p>
etc.