仓酷云

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

[学习教程] ASP编程:实行一个asp文件完成避免Access数据库下...

[复制链接]
活着的死人 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:15:03 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
ASP是依赖组件的,能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊!access|数据|数据库|下载|实行思绪是来自:<%的利用,然后Asp实行的时分报错。
如今只是把他写成asp代码了,便利利用。
由于如许话能够间接实行就ok了,也不必下载数据库然后建表等。。。。然后再上传掩盖了。。。
偶的代码只是为了完成这个功效:考究有用。请列位多多指导。。。。
特地增补一下这代码发生的背景:我也是发起mdb映照的对照好,也作了录象了,厥后他硬要问:在没有做影射的假造主机上怎样办,以是就匆仓促写了这么段代码免除他下载然先手工拔出<%然后上传的贫苦。
1.加了具体的毛病形貌了。
2.我用随机表应当能够办理这个成绩的吧。
3.我到场多个<%也基础能够制止%>的成绩的吧。在复杂的其他中央不触及两进制数据的时分,我以为这个办法仍是不错。
同时感谢zhouzhen的品评。接待再次提出品评。。感谢
<%OPTIONEXPLICIT%>
<%
Dimstr_form,str_version,i
dimmdbfile,conn,rec,str_notdown,tabale_notdown
str_version="codeby喜好哀伤QQ:122545971<br>"
str_version=str_version&"本页代码感化:避免Access数据库被下载<br>"&"特性是:利用便利,间接上传到空间实行终了就能够了。<br>"
str_version=str_version&"powers同盟小家庭<Ahref=http://www.powers.com.cn>_blank>http://www.powers.com.cn</A><br>"

mdbfile=request("mdbfile")
ifmdbfile=""then
str_form="<formaction=method=post>数据库文件名[包括绝对路径]:<inputtype=textname=mdbfile></input><inputtype=submitname=submitvalue=避免下载>"
callout_YS(str_form)
response.end
endif

mdbfile=server.mappath(mdbfile)
setconn=server.createobject("adodb.connection")
Onerrorresumenext
conn.open"driver={microsoftaccessdriver(*.mdb)};uid=admin;pwd=;dbq="&mdbfile
IfErrThen
err.Clear
SetConn=Nothing
callout_YS("数据库毗连堕落,请反省数据库名字和绝对路径是不是准确<Ahref=javascript:history.back()>前往</A>")
Response.End
EndIf

Onerrorresumenext
取随机表名
RANDOMIZE()
tabale_notdown="notdown"&int(9999*rnd()+1)
tabale_notdown="notdown678"
conn.execute("createtable"&tabale_notdown&"(notdownimage)")
iferrthen
callout_YS("堕落:<b>"&err.Description&"</b>,<br><br>请依据提醒办理这个成绩")
else
str_notdown=chrB(60)&chrB(37)
fori=1to13
str_notdown=str_notdown&chrB(60)&chrB(37)
next
setrec=server.createobject("ADODB.recordset")
rec.Open"SELECT*FROMnotdown",conn,1,3
rec.addnew
rec("notdown").appendchunkstr_notdown
rec.update
rec.close
setrec=nothing
callout_YS("避免下载完成,同时提示一下,假如不是asp扩大名的请修正为asp")
endif
conn.close
setconn=nothing
subout_YS(str_out)
response.write"<divalign=left>"&str_version&"</div><center>"&"<br><br><br><br>"&str_out&"<br>"&"<br>"&"<br>"&"<br>"&"<br>"&"&lt;br></center>"
endsub
%>
</p>ASP在国内异常流行,因为国内大多使用的是盗版的Windows和盗版的SQLServer,而ASP+COM+SQLServer实际上也是一种不错的搭配,其性能也不输于PHP+MYSQL,特别是Windows系统和SQLServer都有图形界面,比APACHE和MYSQL易于维护,因此对于不重视知识产权的国家来说也是一种不错的选择。
分手快乐 该用户已被删除
沙发
发表于 2015-1-19 06:28:53 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
山那边是海 该用户已被删除
板凳
发表于 2015-1-24 09:54:27 | 只看该作者
我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。
冷月葬花魂 该用户已被删除
地板
发表于 2015-1-27 06:09:58 | 只看该作者
作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。
谁可相欹 该用户已被删除
5#
发表于 2015-2-2 11:45:21 | 只看该作者
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
深爱那片海 该用户已被删除
6#
发表于 2015-2-7 19:19:32 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
再现理想 该用户已被删除
7#
发表于 2015-2-23 02:15:39 | 只看该作者
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp),它可以看作是VC和Java的混合体吧。
灵魂腐蚀 该用户已被删除
8#
发表于 2015-3-7 05:21:18 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
海妖 该用户已被删除
9#
发表于 2015-3-14 11:23:22 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
小妖女 该用户已被删除
10#
发表于 2015-3-21 04:59:19 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-25 02:12

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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