|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。开启FSO权限在入手下手-“运转”中实行regsvr32.exescrrun.dll便可。如想封闭FSO权限,在上述命令中加/u参数。注册表中的键值地位:HKEY_CLASS_BOOTF.S.O.FSO中有个办法是CreateFolder,可是这个办法只能在其上一级文件夹存在的情形下创立新的文件夹,以是我就写了一个主动创立多级文件夹的函数,在天生静态页面等方面利用十分便利。函数:
以下为援用的内容:
’--------------------------------
’主动创立指定的多级文件夹
’strPath为相对路径
FunctionAutoCreateFolder(strPath)’AsBoolean
OnErrorResumeNext
DimastrPath,ulngPath,i,strTmpPath
DimobjFSO
IfInStr(strPath,"")<=0OrInStr(strPath,":")<=0Then
AutoCreateFolder=False
ExitFunction
EndIf
SetobjFSO=Server.CreateObject("Scripting.FileSystemObject")
IfobjFSO.FolderExists(strPath)Then
AutoCreateFolder=True
ExitFunction
EndIf
astrPath=Split(strPath,"")
ulngPath=UBound(astrPath)
strTmpPath=""
Fori=0ToulngPath
strTmpPath=strTmpPath&astrPath(i)&""
IfNotobjFSO.FolderExists(strTmpPath)Then
’创立
objFSO.CreateFolder(strTmpPath)
EndIf
Next
SetobjFSO=Nothing
IfErr=0Then
AutoCreateFolder=True
Else
AutoCreateFolder=False
EndIf
EndFunction
挪用办法:
以下为援用的内容:
MyPath="C:ac"
IfAutoCreateFolder(MyPath)Then
Response.Write"创立文件夹乐成"
Else
Response.Write"创立文件夹失利"
EndIf
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。 |
|