仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 791|回复: 9
打印 上一主题 下一主题

[学习教程] ASP网站制作之ASP中文本文件与数据库文件的数据互换(...

[复制链接]
不帅 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:57:11 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。fso|数据|数据库|中文ASP中文本文件与数据库文件的数据互换

收集数据库的使用是WWW上一个很主要的构成部分,能够如许说,假如短少了数据库,收集也就得到了魂灵。人人能够设想一下,假如没有象YAHOO,SOHU等搜刮引擎的话,那末在网上寻觅一个方针变很多么坚苦,人人在茫茫网海里变得不知所往,动辄丢失偏向。实在,这些搜刮引擎是收集数据库的最典范的使用,在ASP(ActiveServerPages)手艺里对数据库的间接操纵是对照多的,上面报告一种由文本文件向数据库文件传送数据的办法。
这个文本体裁是由终端收罗传送到服务器的一个流动目次下,由服务器往读取数据并寄存在本机数据库里,转换完后删撤除这个文本文件。如许终端卖力收罗数据,并按给定的格局上传到服务器的指定目次下,服务器真个数据库对终端来说是完整不通明的,保证了服务器的平安,对如今的收集数据库使用来说也许有点匡助。
Txttolib.asp
<html>

<head>
<metahttp-equiv="refresh"content="30;url=deltext.asp">
<metahttp-equiv="Content-Type"
content="text/html;charset=gb_2312-80">
<metaname="GENERATOR"content="MicrosoftFrontPageExpress2.0">
<title>[把文本文件转换成数据库文件]</title>
</head>

<bodybgcolor="#FFFFFF">
<align="center">
<palign="center"><fontcolor="#FF0000">正在处置数据,请稍候!
<br>
</font><fontcolor="#000000"><align="center"><%
str=server.mappath("/")‘获得服务器的根目次
Setfso=CreateObject("Scripting.FileSystemObject")
Setf=fso.GetFolder(str&"        hetext")
Setfc=f.Files
k=1
ForEachf1infc
file(k)=f1.name‘失掉此路径下的一切文件名
k=k+1
next
%><%ii=1%><%
setfs=CreateObject("Scripting.FileSystemObject")%><%
whileii<k
response.writefile(ii)&"<br>"
settextinstance=fs.opentextfile(str&"        hetext"&file(ii),1,false,false)‘翻开文件来读数据
whiletextinstance.atendofstreamtrue‘假如文件没有停止
visitornum=textinstance.readline‘读进一行数据
j=0
cd=len(visitornum)
fori=1tocd
ifmid(visitornum,i,1)=","then‘数据与数据之间以“,”离隔
j=j+1
else
selectcasej‘分离获得各数据值
case0
me1=me1+mid(visitornum,i,1)
case1
me2=me2+mid(visitornum,i,1)
case2
me3=me3+mid(visitornum,i,1)
case3
me4=me4+mid(visitornum,i,1)
case4
me5=me5+mid(visitornum,i,1)
case5
me6=me6+mid(visitornum,i,1)
endselect
endif
next
response.writeme1&""&me2&""&me3&""&me4&""&me5&""&me6&""&"<br>"
setcn=server.createobject("adodb.connection")
cn.open"water","",""
setrs=server.createobject("adodb.recordset")
sql="select*fromwatertable"
rs.opensql,cn,3,3‘翻开数据库举行追加操纵
ifrs.eof=truethen
onerrorresumenext
rs.movelast
rs.movefirst
onerrorresumenext
endif
rs.addnew‘增添一笔记录
rs("wvalue")=me1
rs("wdate")=me2
rs("wtime")=me3
rs("zxz")=me4
rs("jdh")=me5
rs("czh")=me6
rs.update‘更新数据
rs.close
me1=""
me2=""
me3=""
me4=""
me5=""
me6=""
wend
ii=ii+1
wend%><align="center"></font><fontcolor="#FF0000">数据处置终了!</font>
</p>
</body>
</html>

deltext.asp
<html>

<head>
<metahttp-equiv="refresh"content="30;url=txttolib.asp">
<metahttp-equiv="Content-Type"
content="text/html;charset=gb_2312-80">
<metaname="GENERATOR"content="MicrosoftFrontPageExpress2.0">
<title>[删除文件]</title>
</head>

<bodybgcolor="#FFFFFF">

<palign="center"><fontcolor="#FF0000">正在删除文件,请稍候!<br>
</font><fontcolor="#000000"><%
dimfile(50)‘界说最年夜文件数
str=server.mappath("/")
Setfso=</p>因为现在数据库都使用标准的SQL语言对数据库进行管理,所以如果是标准SQL语言,两者基本上都可以通用的。SQLServer还有更多的扩展,可以用存储过程,数据库大小无极限限制。
活着的死人 该用户已被删除
沙发
发表于 2015-1-20 06:24:39 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
简单生活 该用户已被删除
板凳
发表于 2015-1-21 16:22:49 来自手机 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
冷月葬花魂 该用户已被删除
地板
发表于 2015-1-29 15:29:32 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
蒙在股里 该用户已被删除
5#
发表于 2015-2-6 02:22:28 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
柔情似水 该用户已被删除
6#
发表于 2015-2-15 01:23:02 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
小女巫 该用户已被删除
7#
发表于 2015-3-4 10:52:54 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
兰色精灵 该用户已被删除
8#
发表于 2015-3-11 18:27:44 | 只看该作者
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
只想知道 该用户已被删除
9#
发表于 2015-3-19 07:10:39 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
10#
发表于 2015-3-27 12:09:59 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-30 01:29

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表