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

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條評論
主站蜘蛛池模板: 午夜看一级特黄a大片黑 | 亚洲国产美女精品久久久久 | 美女福利在线观看 | 亚洲一级毛片在线观 | 青青青精品免费视频 | 久久香蕉国产线看观看8青草 | 中文字幕在线观看2023 | 天天插天天射天天操 | 久操热久操 | 夜夜操天天插 | h视频国产 | 欧美国产综合日韩一区二区 | 国产特级毛片aaaaaa高清 | 五月花在线观看播放视频 | 久久高清免费视频 | 天天碰天天操 | 在线观看黄色免费视频 | 亚洲 欧美 成人日韩 | 久久国产综合精品欧美 | 天天干天天操天天添 | 大色综合色综合网站 | 免费一级a毛片在线播出 | 日本特级aⅴ一级毛片 | 99re66热这里只有精品首页 | 国产成人精品999在线 | 66精品综合久久久久久久 | 亚洲中字在线 | 99久久99热精品免费观看国产 | 日韩色吧 | 激情五月婷婷久久 | 久久精选| 四虎影院网址大全 | 久久伊人一区二区三区四区 | 久久亚洲国产最新网站 | 四虎国产精品永久地址99新强 | 看毛片免费 | 伊人久久精品 | 亚洲国产成人资源在线桃色 | 亚洲日本在线观看视频 | 婷婷开心激情 | ab毛片|