当前位置:七道奇文章资讯网站建设网站编程
日期:2010-12-07 11:50:00  来源:本站整理

asp将文本文件导入到access数据库[网站编程]

赞助商链接



  本文“asp将文本文件导入到access数据库[网站编程]”是由七道奇为您精心收集,来源于网络转载,文章版权归文章作者所有,本站不对其观点以及内容做任何评价,请读者自行判断,以下是其具体内容:

操纵asp将文本文件导入到指定的数据库的某个字段中去,主要用到的是fso文件操作和数据库插入代码.

  index.asp

  1.   <!--#include file="conn.asp"--> 
  2.  
  3.   <%  
  4.  
  5.   'On Error Resume next  
  6.  
  7.   Server.ScriptTimeOut = 9999 
  8.  
  9.   i=0 
  10.  
  11.   '成立一个FileSystemObject对象的事例  
  12.  
  13.   Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")  
  14.  
  15.   ctime=Timer 
  16.  
  17.   thing=server.mappath("./aaa.txt")  
  18.  
  19.   Call getEmail(thing)  
  20.  
  21.   response.write "已经生成"&i&"条记录,用时"&(Timer-ctime)&"秒"  
  22.  
  23.   %> 
  24.  
  25.   </Body> 
  26.  
  27.   </HTML> 
  28.  
  29.   <%  
  30.  
  31.   Function getemail(filepath)  
  32.  
  33.   Set MyTextFile=MyFileObject.OpenTextFile(filepath)  
  34.  
  35.   While not MyTextFile.AtEndOfStream  
  36.  
  37.   txt=Trim(MyTextFile.ReadLine)  
  38.  
  39.   sql="insert into bbbb(aaaa) values('"&txt&"')"  
  40.  
  41.   rs.open sql,conn,1,1  
  42.  
  43.   ii=i+1  
  44.  
  45.   Wend  
  46.  
  47.   MyTextFile.Close  
  48.  
  49.   End Function  
  50.  
  51.   %> 
  52.  

  aaa.txt中的内容是

  1111111111111

  222222222222

  qqqqqqqqqqqqqqq

  3434

  eeeeeeeeeeeeee

  conn.asp为数据库衔接代码

  1.   <%  
  2.  
  3.   set rs=server.CreateObject("adodb.recordset")  
  4.  
  5.   db="./aaaa.mdb" 
  6.  
  7.   set conn=server.CreateObject("adodb.connection")  
  8.  
  9.   connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)  
  10.  
  11.   conn.open connstr  
  12.  
  13.   %> 
  14.  

  以上是“asp将文本文件导入到access数据库[网站编程]”的内容,如果你对以上该文章内容感兴趣,你可以看看七道奇为您推荐以下文章:
  • asp将文本文件导入到access数据库
  • 本文地址: 与您的QQ/BBS好友分享!
    • 好的评价 如果您觉得此文章好,就请您
        0%(0)
    • 差的评价 如果您觉得此文章差,就请您
        0%(0)

    文章评论评论内容只代表网友观点,与本站立场无关!

       评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论
    Copyright © 2020-2022 www.xiamiku.com. All Rights Reserved .