在线求助ASP代码

[sunwindcm]

要求:
首页中可以实现从用户电脑中的excel文件中的数据批量导入ASP中(如手机号码)并将这些数据与数据库中的进行比对(比较该手机号属于哪里),然后将数据返回另一页中,并用表格显示出来

[liulun]

如果有钱,偶愿意帮你写.QQ412588801


http://www.jiaoshirc.net
教师人才网，网罗天下教师职位！

[liulun]

钱多少倒无所谓

[exciter]

好好学习天天向上

[chinastorm]

读excel和读access差不多的，网上有代码的

[飞天神笔]

以下是一个连接excel文件的ASP代码，你可以参照一下：

<%
Dim Conn,Driver,DBPath,RS
' 建立Connection对象
Set Conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Excel Driver (*.xls)};hdr=no;"
DBPath = "DBQ=" & Server.MapPath("bb.xls")
'调用Open 方法打开数据库
Conn.Open Driver & DBPath
response.Write("数据库连接成功!<BR>")

Set RS = Server.CreateObject("ADODB.Recordset")

Sql="Select * From [Sheet1$] where [aa]='ds'"

RS.Open sql , conn

i = RS.Fields.count
Do While Not RS.EOF
response.Write(RS("aa")) & " : "
response.Write(RS("bb")) & "<br>"
rs.movenext
Loop
Conn.Close
Set Conn=Nothing
%>