FAQ's del foro de ASP

Owen-Bonilla · #16 (**permalink**) 19/07/2002, 11:38

Cambiar BackGround usando Cokkies ( Ejemplo Sencillos )

<%
IF Request.Form("Fondo")<>"" THEN
Response.Cookies("ColorFondo") = Request.Form("Fondo")
END IF
%>

<HTML>

<HEAD>
<TITLE> Color de Fondo Para tus Páginas </TITLE>
</HEAD>

<% IF Request.Form="" THEN %>

<BODY>

Escoge color de fondo para tus páginas: <BR>
<FORM ACTION="color_fondo.asp" METHOD="POST">
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="AA0000"> Rojo </TD> </TR> <BR>
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="00AA00"> Verde </TD> </TR> <BR>
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="0000FF"> Azul </TD> </TR> <BR>
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="FFFF00"> Amarillo </TD> </TR> <BR>
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="FF00FF"> Morado </TD> </TR> <BR>
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="00FFFF"> Cyan </TD> </TR> <BR>
<TR> <TD> <INPUT TYPE="RADIO" NAME="Fondo" VALUE="FFFFFF" CHECKED> Blanco </TD> </TR> <BR><BR>
<TR> <TD> <INPUT TYPE=SUBMIT VALUE="Actualizar fondo"> </TD> </TR>
</FORM>

<% ELSE %>

<BODY BGCOLOR= <%=Request.Cookies("ColorFondo")%> >

Color de fondo cambiado. El valor del Color Actual es:&<b><%=Request.Form("Fondo")%></b>
<p> Regresar para seleccionar otro color ---> <a href="color_fondo.asp"> Click Aqui </a>

<% End If %>
</BODY>
</HTML>

Solo copielo, guardenlo y corranlo !!

Saludos a todos

!!!
Y no estaria mal que Foros del Web Creara una sección especial de FAQ's con todos estos ejemplos

urjose · #17 (**permalink**) 21/07/2002, 14:28

Otro sistema de usuarios:

http://www.aspfacil.com/articulos/verarticulo.asp?id=44

Saludos

urjose · #18 (**permalink**) 26/07/2002, 14:20

Ahi van otras.

Como conecto ASP con MySQL

<%

Conexion = "Driver={MySQL};SERVER=localhost;DATABASE=nombreBa seDatos;UID=nombreUsuario;PASSWORD=password"
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open Conexion
%>

Por que cuando despliego algo que guarde por medio de un textarea me sale todo corrido y no respeta los saltos de línea?

Cadena=Replace(Rs("Campo"),chr(13),"<br>")
Response.Write Cadena

Saludos

urjose · #19 (**permalink**) 27/07/2002, 13:04

y aquí otra, que hace tiempo que no salía pero también es una FAQ...

Tengo un foro, mis usuarios pueden poner http://www.comunidadguru.com, esto lo ingreso a una BD, como lo despliego pero ya convertido en link?

http://www.forosdelweb.com/showthrea...threadid=92336

Saludos

bakanzipp · #20 (**permalink**) 29/07/2002, 12:38

es posible encriptar en asp?

http://www.forosdelweb.com/showthrea...threadid=77655
http://www.innerhost.com/es/Default....components.asp

bakanzipp · #21 (**permalink**) 29/07/2002, 17:10

un buen tip de encriptacion dee ash

http://www.forosdelweb.com/showthrea...threadid=92822

urjose · #22 (**permalink**) 29/07/2002, 17:22

Otra clasica:

Que significan los dos numeros al abrir un Recordset?

Rs.Open SQL, Conexion, ? , ?

http://www.aspfacil.com/articulos/verarticulo.asp?id=65

bakanzipp · #23 (**permalink**) 30/07/2002, 19:30

como paso datos de una base de datos a una planilla excel?

http://www.forosdelweb.com/showthrea...threadid=93047

ashketchum · #24 (**permalink**) 31/07/2002, 11:58

Hola, tambien quiero aportar esto, si quieren encriptar las contraseñas (algo muy básico) en una base de datos, cookies o lo que se les ocurra pueden usar este Script que yo diseñe esta en este link

http://www.forosdelweb.com/showthrea...threadid=92822

espero que les sirva

saludos y suerte

bakanzipp · #25 (**permalink**) 31/07/2002, 17:31

como respeto los saltos de linea al ingresar los datos en un textarea y luego visualizarlos?

http://www.forosdelweb.com/showthrea...threadid=80259

CABEZOTA · #26 (**permalink**) 31/07/2002, 17:41

como evitar que cuando ingresen una cadena demasiado larga se deformen las tablas (a lo largo)

http://www.forosdelweb.com/showthrea...threadid=93279

Saludos

bakanzipp · #27 (**permalink**) 02/08/2002, 17:11

necesito servidores gratuitos de ASP.

http://www.forosdelweb.com/showthrea...threadid=93694

Owen-Bonilla · #28 (**permalink**) 15/08/2002, 15:00

Cómo Muestro un Archivo Excel en una Hoja ASP?

Esto ya lo habian mencionado, pero por si tienen problemas aqui dejo el código completo que funciona bien.
Articulo de ASPFACIL (http://www.aspfacil.com/articulos/190301.asp)

<% @language=vbscript %>
<html>
<head>
<title>Inventario de Excel</title>
</head>

<%

Path=Server.MapPath("Archivo_Excel.xls")
Set ConexionBD = Server.CreateObject("ADODB.Connection")
ConexionBD.Open "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=" & Path
Set rsVac = Server.CreateObject("ADODB.Recordset")
rsVac.Open "Select * From Nombre_De_Rango" ,ConexionBD,3,3
%>
<body>
<h2><b><center>Inventarios</center></b></h2>
<hr>
<table border=1 align="center">

<%

' Aqui mencionamos las columnas que quiero mostrar ( nota: la columa "A"
' seria rsVac.Fields.Item(0).Name ) osea que este ejemplo te muestra las 3 primelas columas ( A, B y C )

Response.Write "<th>" & rsVac.Fields.Item(0).Name & "</th>" & vbCrLf
Response.Write "<th>" & rsVac.Fields.Item(1).Name & "</th>" & vbCrLf
Response.Write "<th>" & rsVac.Fields.Item(2).Name & "</th>" & vbCrLf

'Y por último, el cuerpo de los datos
Do While Not rsVac.EOF
Response.Write "<tr>" & vbCrLf
Response.write "<td>" & rsVac(0) & "</td>"
Response.write "<td>" & rsVac(1) & "</td>"
Response.write "<td>" & rsVac(2) & "</td>"

Response.Write "</tr>" & vbCrLf
rsVac.MoveNext
Loop
Response.Write "</table>"

'Se cierra y se destruye el objeto recordset
rsVac.Close
Set rsVac = Nothing

'Se cierra y se destruye el objeto connection
ConexionBD.Close
Set ConexionBD = Nothing
%>
</body>
</html>

NOMBRE DE RANGO: En el archivo Excel ( abierto ) defines el nombre de rango, osea, el rango de las celdas que estes usando.

1) Seleccionas todos los datos que tengas.
2) Menu INSERTAR
3) Seleccionas NOMBRE, Luego DEFINIR
4) Escribes el nombre que quieras
5) Picas en AGREGAR
6 ) Guardas el archivo

Owen-Bonilla · #29 (**permalink**) 15/08/2002, 15:20

DE EXCEL Y ASP. Porque me sale este error?:

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Controlador ODBC Excel]Error general No se puede abrir la clave 'Temporary (volatile) Jet DSN for process 0x950 Thread 0x654 DBC 0x1210064 Excel' del Registro.

Tienes que cerrar la BD, que en este caso es el archivo Excel ;)

Saludos

GSMDN · #30 (**permalink**) 19/08/2002, 07:09

compactar bases de datos Access via Explorer

Es simplemente genial, pase mi BD de 92 MB a 39:

http://www.forosdelweb.com/showthrea...threadid=49143