佳木斯湛栽影视文化发展公司
主頁(yè) > 知識(shí)庫(kù) > asp實(shí)現(xiàn)檢查目錄是否存在與建立目錄的函數(shù)

asp實(shí)現(xiàn)檢查目錄是否存在與建立目錄的函數(shù)
熱門(mén)標(biāo)簽：Linux服務(wù)器 Mysql連接數(shù)設(shè)置 電子圍欄 團(tuán)購(gòu)網(wǎng)站 阿里云 科大訊飛語(yǔ)音識(shí)別系統(tǒng) 服務(wù)器配置 銀行業(yè)務(wù)
'-------------------------
'--檢查目錄是否存在
'----------------------
Function CheckDir(byval FolderPath)
    dim fso
    Set fso = Server.CreateObject("Scripting.FileSystemObject")
    If fso.FolderExists(Server.MapPath(folderpath)) then
    '存在
        CheckDir = True
    Else
    '不存在
        CheckDir = False
    End if
    Set fso = nothing
End Function

'-------------------------
'--建立目錄
'----------------------
Function MakeNewsDir(byval foldername)
    dim fso
    Set fso = Server.CreateObject("Scripting.FileSystemObject")
        fso.CreateFolder(Server.MapPath(foldername))
        If fso.FolderExists(Server.MapPath(foldername)) Then
           MakeNewsDir = True
        Else
           MakeNewsDir = False
        End If
    Set fso = nothing
End Function

標(biāo)簽：廣元 衢州 江蘇 蚌埠 衡水 棗莊 大理 萍鄉(xiāng)

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《asp實(shí)現(xiàn)檢查目錄是否存在與建立目錄的函數(shù)》，本文關(guān)鍵詞  ；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 收縮
    • 微信客服
    • 微信二維碼

    • 電話(huà)咨詢(xún)

    • 400-1100-266
    花垣县| 湘西| 麻城市| 四会市| 蒙阴县| 周宁县| 洮南市| 新疆| 巫山县| 改则县| 偃师市| 蕲春县| 巨鹿县| 溧水县| 合水县| 文昌市| 桐梓县| 通海县| 东乡| 体育| 比如县| 罗平县| 卓尼县| 临澧县| 周口市| 长葛市| 正蓝旗| 乌兰察布市| 横山县| 万山特区| 措美县| 岱山县| 岑溪市| 花莲市| 监利县| 张家口市| 准格尔旗| 鲁甸县| 门源| 和硕县| 烟台市|