Tengo una página principal con un menú, una botonera y demás que recargan un div "contenedor" mediante AJAX.
Una de esas opciones es un buscador de archivos, en una carpeta del sitio.
Bien el problema es el siguiente, cargo el form del buscador como el resto de las páginas modificando el contenido de "contenedor", y al darle al boton de submit se me recarga la página y me deja unicamente el <div> "contenedor" con el resultado.
Bien, se que el problema esta en que en ese boton no estoy llamando a la funcion de AJAX que me recarga el contenido, entonces lo hago mediante un enlace para que si que lo haga ya que llamo esa funcion para $(a[rel='history']).funcion.click, pero entonces no puedo llamar al codigo VB que tengo para que haga la busqueda.
Pongo el código para que os hagais una idea:
Código:
<script runat="server"> Dim SearchTerm, Novalid, NovalidResponse, FolderName, SearchResponse, FolderToCheck, Wfile, Wfile2, a, ct, ct2, SearchTerm2, longitud, longitud2 Dim palabras() As String Sub submit() SearchTerm = Request.Form("term") Novalid = " a b c d e f g h i j k l m n o p q r s t u v w x y z yes no and more" NovalidResponse = "Go back and try again. Your search term is very common" palabras = Split(SearchTerm, " ") If InStr(SearchTerm, Novalid) = 0 Then Response.Write("<CENTER><H2>Resultados de la Búsqueda</H2></CENTER>") FolderName = "Documentos" ShowList() Else Response.Write(NovalidResponse) End If SearchResponse = "" End Sub Sub ShowList() FolderToCheck = Server.MapPath("./") & "/" & FolderName Dim fs, f, f1, fc Dim valido As Boolean Dim i As Integer Dim resultado As String resultado = "" fs = CreateObject("Scripting.FileSystemObject") f = fs.GetFolder(FolderToCheck) fc = f.Files For Each f1 In fc Wfile = f1.name If Right(Wfile, 4) = ".pdf" Then For i = 0 To (palabras.Length - 1) Step 1 SearchTerm = palabras(i) Wfile2 = LCase(Wfile) If InStr(Wfile, SearchTerm) > 0 Or InStr(Wfile2, SearchTerm) Then valido = True Else valido = False Exit For End If Next If (valido) Then SearchResponse = SearchResponse + "<TR><TD>" + Wfile + "</TD><TD ALIGN=CENTER VALIGN=MIDDLE>" + " <A HREF=" + "/recaudacion/" + FolderName + "/" + Wfile + "> Ver </A></TD></TR>" valido = False End If End If Next resultado = resultado + "<TABLE BORDER=0 WIDTH=550><TR><TD BGCOLOR=C0C0C0><FONT SIZE=5><B>Resultados de la Busqueda</B></FONT></TD></TR></TABLE>" resultado = resultado + "<TABLE BORDER=0 WIDTH=550>" If SearchResponse <> "" Then resultado = resultado + (SearchResponse) Else resultado = resultado + "<TR><TD>NO SE ENCUENTRAN DOCUMENTOS PARA LAS PALABRAS ESPECIFICADAS</TD></TR>" End If resultado = resultado + "</TABLE>" resultado = resultado + "</CENTER></BODY></HTML>" resultados.innerHTML = resultado End Sub </script> <div class="caja"> <div class="caja_arriba"> </div> <h3>BUSCADOR DE DOCUMENTOS</h3> <form id="Form1" method="POST" runat="server" action="index.aspx#searchfiles"> <table border="0" cellpadding="5" > <tr> <td align="center"> Terminos de busqueda : <input type="text" name="term" size="15"> <a href="#searchfiles" id="button1" text="Buscar" rel='history' onclick="submit" >Buscar</a> <input type="hidden" value="submit" name="metodo" /> </td> </tr> </form> </table> <div id="resultados" runat="server"> </div> <div class="caja_abajo"> </div> </div>