En la práctica, Excel tiene muchas aplicaciones. Hoy tengo un montón de archivos de Excel y necesito leer los datos que contienen y usarlos para otros fines. Esto implica que asp recorra todos los nombres de las tablas en Excel. Mira el código:
Copie el código de código de la siguiente manera:
<%@LANGUAGE=PÁGINA DE CÓDIGOS VBSCRIPT=65001%>
<%
dim conn,rs,excelNombre de archivo
excelFileName=Servidor.MapPath(Datos/prueba.xls)
establecer conexión = Server.CreateObject(ADODB.Connection)
conn.connectionstring=Provider=Microsoft.Jet.OleDb.4.0;Persist Security Info=True;Data Source= & excelFileName & ;Extended ProPerties=Excel 8.0;HDR=Sí;IMEX=1;
conexión.abierto()
establecer rs=conn.OpenSchema(20)
%>
<!DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transicional//EN http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd>
<html xmlns= http://www.w3.org/1999/xhtml>
<cabeza>
<meta http-equiv=Tipo de contenido content=text/html;charset=utf-8 />
<título>Operaciones de Excel</título>
</cabeza>
<cuerpo>
<%
oscuro yo
respuesta.write(campo de información de la tabla de Excel:<br />--------------------------------<br />)
para i=0 a rs.fields.count-1 paso 1
respuesta.write(rs.fields(i).nombre&<br />)
próximo
respuesta.write(<br />Nombre de la tabla (Table_Name) en Excel:<br />------------------------<br />)
mientras no rs.EOF
respuesta.write(rs(Nombre_tabla)&<br />)
rs.movenext
encaminarse a
%>
</cuerpo>
</html>