快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

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

<%

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
%>
返回类别: 教程
上一教程: 使用ASP实现广告代理方式
下一教程: ASP+SQL SERVER 分页方式(不用存储过程)

您可以阅读与"从文本文件中读取信息并存储入数据库"相关的教程:
· 将数据库中的信息存储至XML文件中
· ASP中文本文件与数据库文件的数据交换
· 使用FSO把文本信息导入数据库
· ASP中文本文件与数据库文件的数据交换(FSO)
· 怎样读取一个文本文件的内容?
    微笑服务 优质保证 索取样品