Código fuente de noticias de Autohome
Palabras clave ASP, Excel, programación, base de datos
En primer lugar, las preguntas planteadas
La programación ASP tiene muchos problemas, grandes y pequeños. Una vez me encontré con este problema al diseñar un sitio web para una librería. Al principio, Access se utilizaba como base de datos, principalmente para almacenar información sobre libros en las librerías. Sin embargo, cuando se registraban demasiadas entradas, el tamaño de la base de datos se hacía muy grande. En aplicaciones prácticas, el espacio del sitio web es limitado. Muchos clientes que quieren crear un sitio web no tienen su propio hosting. El espacio del sitio web se compra al proveedor de espacio del sitio web, lo que requiere que la cantidad de documentos en el sitio web se reduzca tanto como sea posible cuando el espacio del sitio web sea seguro. Entonces elegí Excel como base de datos.
2. Métodos y explicaciones
Los archivos de Excel (como book.xls) se consideran una base de datos y cada tabla se considera una tabla de base de datos. Se supone la primera fila de nombres de campos en Excel, por lo que el rango que defina debe incluir el contenido de la primera fila.
Los encabezados de fila (es decir, los nombres de los campos) en Excel no pueden contener números. El controlador de Excel cometerá un error cuando encuentre un problema de este tipo (por ejemplo, el título de su fila es "F1"). Si una columna de Excel contiene texto y números, el controlador ODBC de Excel no podrá procesar los datos de esa fila correctamente y deberá asegurarse de que el tipo de datos de la columna sea coherente.
Usa Excel como base de datos. Al agregar datos, puede editarlos usando Microsoft Excel en su computadora local. Cuando los libreros producen materiales para libros, a menudo descargan los materiales necesarios de las principales editoriales. La información de este libro tiene un formato fijo y el librero agrega una gran cantidad de datos descargados a la base de datos de Excel copiando y pegando. Después de completar los datos, suba la base de datos de Excel al sitio web. Este método tiene las siguientes ventajas: rápido, conveniente y fácil de operar.
El primer paso para acceder a la información de la base de datos es establecer una conexión con la fuente de la base de datos.
Utilice el método de conexión a la base de datos de Excel:
& lt%
Number Connector, Drive, DBPath, Rs
Set Conn=Server. CreateObject("ADODB.Connection")
Driver = " Driver = { Microsoft Excel Driver(*.xls)};"
DBPath = " DBQ = " & servidor. MapPath("book.mdb ")
Abra el controlador y. DBPath
% & gt
donde driver = " driver = {Microsoft Excel driver(*.xls)};"
Esta línea de código es la clave , principalmente Es elección del conductor. Comparemos los métodos de conexión entre Access y la base de datos.
& lt%
Conector Digital, Unidad, DBPath, Rs
Establecer Conn = Servidor. CreateObject("ADODB.Connection")
Driver = " Driver = {Microsoft Access Driver (*.MDB)};"
DBPath = "DBQ = " & Servidor . MapPath("book.mdb ")
Abra el controlador y. DBPath
% & gt
Tres. Lista de programas
Consulta y muestra el código titulado Campo Hoja1:
& lt%
Conector digital, controlador, DBPath, Rs
Crear objeto de conexión
Establecer Conn = Servidor. CrearObjeto("ADODB.
Conexión")
Driver = " Driver = { Microsoft Excel Driver(*.xls)};"
DBPath = " DBQ = " & Server.MapPath("book. xls " )
Llame al método Open para abrir la base de datos.
Conn.Abra el controlador y. " Dsn=book"
Tenga en cuenta que el nombre de la tabla debe escribirse en la prueba "[nombre de la tabla$]" a continuación
SQL = "Seleccionar * De[hoja 1 $]"
Establezca Rs=Conn.Execute(Sql)
Si Rs. Eof y Rs. Entonces use Bof
Response.write "Los datos que necesita no son ¡encontró! !"
Otro
No hacerlo. Fin del archivo
Respuesta.escribir Rs("Título del libro")
Respuesta. escribe "<br>;
el siguiente anillo de rupia
terminará si...
cierre de rupia
Establecer Rs=Ninguno
Cerrar la sala de control
Establecer Conexión=Ninguno
% & gt
Consultar y mostrar todos los contenidos de Código Hoja1:
& lt%
Número Conector, Controlador, DBPath, Rs
Establecer Conn = Servidor. CreateObject("ADODB.Connection")
Driver = " Driver = { Microsoft Excel Driver(*.xls)};"
DBPath = " DBQ = " & servidor. MapPath( "book.xls ")
Abra el controlador y. DBPath
Establezca Rs = servidor. CreateObject("ADODB.RecordSet")
SQL = "seleccionar * de[hoja 1 $]"
Ruby Open Connecticut Sql, 2, 2
% & gt
& lttable border="1 " >>p>
& lttr & gt
& lt%
Para i =0 a Rs. campo. cuenta-1
% & gt
& lttd bgcolor = " # 0099FF " & gt& lt%=Rs(i). Nombre % & gt& lt/TD & gt;
& lt%
Luego
% & gt
& lt/tr & gt;
& lt%
Hazlo pero no lo hagas. Fin del archivo
% & gt
& lttr & gt
& lt%
Para i=0 a Rs. campo. cuenta-1
%>
& lttd>& lt% = Rs(I)%></TD>
& lt%
Entonces
% & gt
& lt/tr & gt;
& lt%
Rs Siguiente
Timbre
Rs desactivado
Establecer Rs=Ninguno
Conexión desactivada
Establecer conexión =Ninguno
%>
</table>
Cuatro.
Conclusión
Este artículo presenta principalmente las funciones de programación ASP y operación de Excel, y realiza la recuperación de la base de datos de Excel. El método de implementación es simple y el código del programa es pequeño, lo que puede usarse como referencia para la programación real. El programa anterior se ha ejecutado en Windows2000Sever e IIS5.0