asp读取excel表名的实现代码_应用技巧

看代码：

复制代码 代码如下:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
dim conn,rs,excelFileName
excelFileName=Server.MapPath("Data/test.xls")
set conn = 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=Yes;IMEX=1"";"
conn.open()
set rs=conn.OpenSchema(20)
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns=" http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Excel操作</title>
</head>

<body>
<%
dim i
response.write("Excel表信息字段：<br />------------------------<br />")
for i=0 to rs.fields.count-1 step 1
response.write(rs.fields(i).name&"<br />")
next
response.write("<br />Excel中的表名(Table_Name)：<br />------------------------<br />")
while not rs.EOF
response.write(rs("Table_Name")&"<br />")
rs.movenext
wend
%>
</body>
</html>

时间： 2025-01-20 10:06:21

asp读取excel表名的实现代码_应用技巧的相关文章

asp读取excel表名的实现代码

看代码: <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>  代码如下 复制代码 <% dim conn,rs,excelFileName excelFileName=Server.MapPath("Data/test.xls") set conn = Server.CreateObject("ADODB.Connection") conn.connectionstring=

asp.net动态获取Excel表名的函数代码_实用技巧

复制代码 代码如下: public string GetExcelFirstTableName(string excelFileName) { string tableName = null; if (File.Exists(excelFileName)) { using (OleDbConnection conn = new OleDbConnection("Provider=Microsoft.Jet." + "OLEDB.4.0;Extended Properties=

asp.net 读取Excel数据到DataTable的代码_实用技巧

复制代码 代码如下: /// <summary> /// 获取指定路径.指定工作簿名称的Excel数据:取第一个sheet的数据 /// </summary> /// <param name="FilePath">文件存储路径</param> /// <param name="WorkSheetName">工作簿名称</param> /// <returns>如果争取找到了数据会返回

ASP读取Request.QueryString编码的函数代码_应用技巧

1. 支持参数纯汉字 ?a=深山老熊 2. 支持参数gb2312 Urlencode编码: ?a=%C9%EE%C9%BD%C0%CF%D0%DC 3. 支持参数UTF-8 Urlencode编码: ?a=%E6%B7%B1%E5%B1%B1%E8%80%81%E7%86%8A 复制代码 代码如下: <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Option Explicit Const YXCMS_CH

asp 读取文件和保存文件函数代码_应用技巧

'************************************* '读取文件 '************************************* Function LoadFromFile(ByVal File) Dim objStream Dim RText RText = Array(0, "") Set objStream = Server.CreateObject("ADODB.Stream") With objStream .Type

读取excel 表名（sheet）乱码（表名是中文是才会乱码）。

问题描述 读取excel 表名(sheet)乱码(表名是中文是才会乱码). 读取excel 表名(sheet)乱码(表名是中文是才会乱码).图片是读取excel表名和连接字符串的格式. 解决方案 你的程序可能使用UTF-8,而EXCEL文件则可能使用了GB18030,编码方案不匹配造成的乱码.参考<编程与编码>http://blog.csdn.net/winsenjiansbomber/article/details/50693186 解决方案二: http://bbs.csdn.net/to

asp.net动态获取Excel表名的函数代码

复制代码 代码如下: public string GetExcelFirstTableName(string excelFileName) { string tableName = null; if (File.Exists(excelFileName)) { using (OleDbConnection conn = new OleDbConnection("Provider=Microsoft.Jet." + "OLEDB.4.0;Extended Properties=

服务器读取EXCEL不安装OFFICE如何实现_实用技巧

前段时间用asp.net做了一简单的游戏管理后台,其中涉及到了上传Excel导入数据的功能,本来在本地开发实现都好好的,可已上传的服务器上就悲剧了.服务器是阿里云 Windows Server 2008 R2(X64),排查后发现服务器没装office这玩意,也就不会有OLEDB驱动程序,实在不想装office,特别是office 2010,看着庞大的体积就头疼,怎办? 百度谷歌一番发现,其实只要安装Microsoft Access 2010 数据库引擎可再发行程序包即可实现2010 Micro

asp.net 结合mysql存储过程进行分页代码_实用技巧

不过在网上找了一些,发现都有一个特点--就是不能传出总记录数,干脆自己研究吧.终于,算是搞出来了,效率可能不是很好,但是我也觉得不错了.贴代码吧直接:也算是对自己学习mysql的一个记录. 复制代码 代码如下: CREATE PROCEDURE p_pageList ( m_pageNo int , m_perPageCnt int , m_column varchar(1000) , m_table varchar(1000) , m_condition varchar(1000), m_or