2024年6月20日发(作者：)
用ASP上传Excel表格并导入到数据库
<%
set upload=new upload_5xSoft
set file=("file1")
formPath="../upload1/"
if me="" then
""
else
if ze>1000 then
fileExt=lcase(right(me,3))
if fileExt<>"xls" then
"文件类型非法"
你没选择文件！
‘);(
end if
end if
randomize
ranNum=int(9000000*rnd)+10000
filename=formPath&year(now)&month(now)&day(now)&hour(now)&minute
(now)&second(now)&ranNum&"."&fileExt
if ze>0 then
h(FileName)
end if
connstr = "driver={microsoft Access driver (*.mdb)}; dbq=" &
h("../../data/#")
set conn3 = object("TION")
connstr
set rs=object("set")
发布者：admin，转转请注明出处：http://www.yc00.com/web/1718877511a2753224.html
评论列表（0条）