从文本文件中读取信息并存储入数据库

2016-01-29 18:20 23 1 收藏

从文本文件中读取信息并存储入数据库,从文本文件中读取信息并存储入数据库

【 tulaoshi.com - ASP 】

  <%

dim fso,f1
Const ForReading = 1

set fso=createobject("Scripting.FileSystemObject")
''使用fso对象读取信息。
set f1=fso.OpenTextFile("E:doitinfo2.txt", ForReading)
''打开要读取的文件
dim conn,rst

set conn=server.createobject("adodb.connection")
''建立数据库连接,执行操作
set rst=server.createobject("adodb.recordset")

conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&Server.mappath("db1.mdb")

rst.activeconnection=conn

dim fread

do while not f1.atEndOfStream
''用do... loop循环体插入数据
fread=f1.readline

line=split(fread,":::")

rst.source="insert into barcode1(barcode1) values ("&trim(line(0))&")"
rst.open
loop

f1.close
conn.close
''''all over
%

 

来源:https://www.tulaoshi.com/n/20160129/1505369.html

延伸阅读
标签: ASP
  Ever want to know how to display the contents of a text document using ASP. Here is a easy way to read from a text file    <!--Start of ASP Code---- <% 'by James Seymour, http://jamesdot.org Dim write Dim fileSysObj, tf, read ' Read the read.txt ' Store the file name where the Inform...
标签: ASP
  <% driver_name1="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=D:\数据库\TREE.MDB"    '根目录下数据库打开语句   dim search,rs,j   search="select * from Files where ID=" & request.querystring("ID")   set my_conn=server.CreateObject ("adodb.connection")   my_conn.open d...
标签: ASP
  注意的是你也可以从一个文件中新建一个位图对象,但使用这样 的方式保存在数据库中的图形格式是浏览器不能够识别的。 当你往数据库中保存图象时,你应该知道你需要使用什么格式来保存 你可以把文件中的每一个字节保存下来,或则通过ACCESS/Foxpro的把图形保存 为一个OLE格式。 你使用什么格式保存图象决定了你在ASP中用什么格式来读出图...
标签: ASP
  在实际的编程中,很多时候我们需要在多行的文本框中显示读取的信息,但是使用 一般的方法是不行的,比如 <%=rs("字段名")%,结果就会不能按者您的要求输出正 确的结果,在这个时候,我们就需要使用一些别的方法,下面是我在实际中使用的一 些方法,具体的代码请见: <textarea rows="4" name="remark&q...
MySQL写入数据通常用insert语句,如 代码如下: insert into person values(张三,20),(李四,21),(王五,70)…; 但有时为了更快速地插入大批量数据或交换数据,需要从文本中导入数据或导出数据到文本。 一、 建立测试表,准备数据 首先建立一个用于测试的表示学生信息的表,字段有id、姓名、年龄、城市、薪水。Id和姓名不 能...

经验教程

675

收藏

84
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部