仓酷云

标题: ASP编程：ASP技能：整站二进制数据库文件复原 [打印本页]

作者: 若天明 时间: 2015-2-3 23:31
标题: ASP编程：ASP技能：整站二进制数据库文件复原
由于ASP提供的是一对多的服务，所以用户的一些特殊需求很难得到满足。二进制|技能|数据|数据库昨天一个在后进的伴侣给的，一个站的一切文件和图片以二进制的体例放进了数据库里，用上面的代码可以把数据库里的文件和图片复原出来。
把失掉的数据库名字改成ToMdb.mdb，然后把上面的代码保留成VBS格局。放在统一个目次下，履行这个VBS文件
Dim rs, ws, fso, conn, stream, connStr, theFolder
Set rs = CreateObject("ADODB.RecordSet")
Set stream = CreateObject("ADODB.Stream")
Set conn = CreateObject("ADODB.Connection")
Set fso = CreateObject("Scripting.FileSystemObject")
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ToMdb.mdb;"
conn.Open connStr
rs.Open "wz", conn, 1, 1
stream.Open
stream.Type = 1
On Error Resume Next
Do Until rs.Eof
thePath = rs("folder") & "\"
theFolder = Left(thePath, InStrRev(thePath, "\"))
If fso.FolderExists(theFolder) = False Then
createFolder(theFolder)
End If
stream.SetEos()
stream.Write rs("body")
stream.SaveToFile str & thepath & rs("file"), 2
rs.MoveNext
Loop
rs.Close
conn.Close
stream.Close
Set ws = Nothing
Set rs = Nothing
Set stream = Nothing
Set conn = Nothing
Wscript.Echo "一切文件释放终了!"
Sub createFolder(thePath)
Dim i
i = Instr(thePath, "\")
Do While i > 0
If fso.FolderExists(Left(thePath, i)) = False Then
fso.CreateFolder(Left(thePath, i - 1))
End If
If InStr(Mid(thePath, i + 1), "\") Then
i = i + Instr(Mid(thePath, i + 1), "\")
Else
i = 0
End If
Loop
End Sub
大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧

作者: 蒙在股里 时间: 2015-2-4 01:03
代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。

作者: 乐观 时间: 2015-2-8 15:49
那么，ASP.Net有哪些改进呢？

作者: 变相怪杰 时间: 2015-2-8 19:54
他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。

作者: 愤怒的大鸟 时间: 2015-2-26 00:30
掌握asp的特性而且一定要知道为什么。

作者: 莫相离 时间: 2015-3-8 10:49
还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

作者: 再现理想 时间: 2015-3-15 21:50
封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

作者: 灵魂腐蚀 时间: 2015-3-22 05:10
Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

作者: 若相依 时间: 2015-3-24 10:37
用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

作者: 透明 时间: 2015-4-1 09:50
它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

作者: 爱飞 时间: 2015-4-5 12:14
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍

作者: 若天明 时间: 2015-4-12 01:23
那么，ASP.Net有哪些改进呢？

作者: 山那边是海 时间: 2015-4-16 12:38
多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。

作者: 柔情似水 时间: 2015-4-16 13:45
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。

作者: 分手快乐 时间: 2015-4-26 12:49
用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

作者: 只想知道 时间: 2015-5-3 22:08
哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?

作者: 活着的死人 时间: 2015-5-10 20:13
我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

作者: 冷月葬花魂 时间: 2015-5-12 09:26
那么，ASP.Net有哪些改进呢？

作者: 第二个灵魂 时间: 2015-5-12 10:00
我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。

作者: admin 时间: 2015-6-5 21:04
跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

作者: 海妖 时间: 2015-6-9 06:02
多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。

欢迎光临仓酷云 (http://ckuyun.com/)