脚本宝典收集整理的这篇文章主要介绍了从文本文件中读取信息并存储入数据库，脚本宝典觉得挺不错的，现在分享给大家，也给大家做个参考。

''===================================================================
''从文本文件中读取信息，取其中的一部分，并且将其插入到数据库中去……
'' xhony@163.COM
'' version 1.0
''===================================================================
<%

dim fso,F1
Const ForReading = 1

set fso=createobject("Scripting.FileSystemObject")
''使用fso对象读取信息。
set f1=fso.OPEnTextFile("E:\doIT\info2.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="&amp;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
%>

脚本宝典总结

以上是脚本宝典为你收集整理的从文本文件中读取信息并存储入数据库全部内容，希望文章能够帮你解决从文本文件中读取信息并存储入数据库所遇到的问题。

如果觉得脚本宝典网站内容还不错，欢迎将脚本宝典推荐好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。