亚洲免费在线-亚洲免费在线播放-亚洲免费在线观看-亚洲免费在线观看视频-亚洲免费在线看-亚洲免费在线视频

asp文件操作

系統 2324 0
< %
MyFolder
= server.mappath( " / " )
set fs = createobject ( " scripting.filesystemobject " )
If fs.folderexists(MyFolder) = false then ' 判斷文件夾是否存在
fs.createfolder(MyFolder)‘創建文件夾
End If

function getuserspace(blogurl)
path
= server.mappath(blogurl)
Set objfso = Server.CreateObject( " Scripting.FileSystemObject " )
Set objFolder = objfso.GetFolder(path)
getuserspace
= objFolder.size
Set objFolder = Nothing
endfunction

function fsize(size)
if size < 1000 then
fsize
= left (size, 5 ) & " B "
elseif size > 1000 and size < 1024 * 1000 then
fsize
= left (size / 1000 , 5 ) & " KB "
elseif size > 1024 * 1000 and size < 1024 * 1024 * 1000 then
fsize
= left (size / ( 1024 * 1000 ), 5 ) & " MB "
else
fsize
= left (size / ( 1024 * 1024 * 1000 ), 5 ) & " GB "
end if
endfunction

blogspace
= getuserspace( " / " )
response.writefsize(blogspace)
' 獲取文件夾的大小,并轉換單位



file
= Server.MapPath( " /ccc.jpg“)
Dim fso,MyFile
Set fso = CreateObject ( " Scripting.FileSystemObject " )
if fso.FileExists(file) then ' 判斷文件是否存在
Set MyFile = fso.GetFile(file)
MyFile.Delete’刪除文件
end if

asp文件操作


更多文章、技術交流、商務合作、聯系博主

微信掃碼或搜索:z360901061

微信掃一掃加我為好友

QQ號聯系: 360901061

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。

【本文對您有幫助就好】

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描上面二維碼支持博主2元、5元、10元、自定義金額等您想捐的金額吧,站長會非常 感謝您的哦!!!

發表我的評論
最新評論 總共0條評論
主站蜘蛛池模板: 国产片一区二区三区 | 久久99热不卡精品免费观看 | 日韩国产精品99久久久久久 | 手机看片福利 | 在线成人欧美 | 久久久久女人精品毛片九一 | 免费观看男女羞羞的视频网站 | 久久成人小视频 | 欧美jizzhd极品欧美 | 亚洲一区二区高清 | 国产成人亚洲影视在线 | 日本一级做人免费视频 | 久久国产乱子伦精品免费看 | 美女福利视频一区二区 | 亚洲免费大片 | 久热免费 | 亚洲欧美中文字幕专区 | 国产精品精品国产一区二区 | 亚洲在线观看一区二区 | 亚洲综合在线观看视频 | 欧美毛片在线播放观看 | 天天天干干干 | 欧美片欧美日韩国产综合片 | 久久在线一区 | 中文字幕精品视频在线观 | 久在线| 亚洲精品国产第一区二区多人 | 国外成人免费高清激情视频 | 94久久国产乱子伦精品免费 | 操熟美女又肥又嫩的骚屁股 | 综合好色| 久久er热在这里只有精品85 | 国产精品久久免费 | 高清不卡日本v在线二区 | 久久99国产精品一区二区 | 亚洲精品99久久久久久 | 亚洲综合另类 | 99热最新| 久久女人 | 午夜一级在线 | 色播在线 |