Ver Mensaje Individual
  #3 (permalink)  
Antiguo 08/04/2003, 12:39
Avatar de MsTech.DotNet
MsTech.DotNet
 
Fecha de Ingreso: marzo-2003
Ubicación: Maracay - Edo. Aragua
Mensajes: 605
Antigüedad: 22 años
Puntos: 0
Mejorando la idea de Fr@Nc3$c0 ......

<%
Set conexion=Server.CreateObject("ADODB.Connection")
conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; "& "Dbq=" & Server.MapPath("busquedas.mdb")

valorBusqueda = request.form("palabra")

If ValorBusqueda = "" then
response.write " Introduce un valor "
Else
consulta="INSERT INTO Busquedas (Palabras, Fecha) VALUES ('"&valorBusqueda&"', '" &now()& "')"

Set resultado=conexion.Execute (consulta)
conexion.Close
End if
%>

Espero que te sirva... sino cualquier cosa avisa...

Saludos...
__________________
Ing. Javier Ugalde
Desarrollador de Aplicaciones Web / Windows
Director de Desarrollos Web
Ing. en Información
Email: [email protected]
Telf. Hab: +[58] - (243) - 232.02.06
Telf. Cel: +[58] - (414) - 455.26.80