vba 服务器上删除文件夹,如何删除文件夹-Excel VBA程序开发-ExcelHome技术论坛 -_weixin_39603588的博客-程序员宅基地

技术标签： vba 服务器上删除文件夹

可以通过api函数来取得文件夹的位置,再进行删除.

Declare Function SHBrowseForFolder Lib "SHELL32.DLL" (lpBrowseInfo As BROWSEINFO) As Long

Declare Function SHGetPathFromIDList Lib "SHELL32.DLL" (ByVal pidl As Long, ByVal pszPath As String) As Long

Public choice As String

Public Type BROWSEINFO

hOwner As Long

pidlRoot As Long

pszDisplayName As String

lpszTitle As String

ulFlags As Long

lpfn As Long

lParam As Long

iImage As Long

End Type

Function GetDirectory(Optional message) As String

Dim bInfo As BROWSEINFO

Dim path As String

Dim r As Long, x As Long, pos As Integer

bInfo.pidlRoot = 0

bInfo.lpszTitle = message

bInfo.ulFlags = &H1

x = SHBrowseForFolder(bInfo)

path = Space$(256)

r = SHGetPathFromIDList(ByVal x, ByVal path)

If r Then

pos = InStr(path, Chr(0))

GetDirectory = Left(path, pos - 1)

Else

GetDirectory = ""

End If

End Function

就可以通过GetDirectory来弹出对话框来选择文件夹,再进行删除了.

本文链接：https://blog.csdn.net/weixin_39603588/article/details/119553025

原作者删帖不实内容删帖广告或垃圾文章投诉

智能推荐

Pyqt5屏幕截图-程序员宅基地

from PyQt5.QtWidgets import QApplicationimport sysif __name__ == "__main__": app = QApplication(sys.argv) screen=QApplication.primaryScreen() pix=screen.grabWindow(QApplication.desktop...

奶制品生产与销售matlab,奶制品的生产与加工-程序员宅基地

实验名称奶制品的生产与销售班级学号姓名实验地点完成日期成绩(一)实验目的与要求目的：建立数学模型来解决企业在无深加工和可深加工的情况下生产与销售最优的计划方案。要求：1)学习掌握决策变量、约束条件并能运用；2)建立模型解决实际优化问题；3)会用数学软件求解，对结果进行分析。(二)实验内容一奶加工厂用牛奶生产A1,A2两种奶制品，1桶牛奶可以在甲设备上用12小时生产成3公斤A1，或者在乙设备上用8小...

ural 1864. Get-Together at Den's （坑爹浮点数）-程序员宅基地

水题一道，要注意两点：1、题目中分配方式没有说明清楚2、浮点数下取整的时候要注意，比如4.9999999其实应该是5#include #include using namespace std;int main(){ long double n,arr[107],sum=0,cnt=0,mark[107]={0},sum2=0; cin>>n;

Qt Excel库xlsx写入单元格样式及使用-程序员宅基地

文章目录[隐藏] Qt xlsx 库使用前言Qt xlsx 库写入单元格样式方法Qt xlsx 库使用简单例子Qt xlsx 库使用简单例子最终效果 Qt xlsx 库使用前言因为我对 xls 格式不做兼容要求，所以选取了此库。具体需要实现的功能，写入 Excel 样式。Qt xlsx 库写入单元格样式方法/*单元格边框样式*/format.setBorderColor(QColo..._qxlsx 填背景色

call_call意义-程序员宅基地

在Python的class中有一些函数往往具有特殊的意义。__init__()和__call__()就是class很有用的两类特殊的函数。__init__()在Python中，__init__()函数的意义等同于类的构造器（同理，__del__()等同于类的析构函数）。因此，__init__()方法的作用是创建一个类的实例。__call__()Python中的函数是一级对象。这意味着P...___call__意义

adb shell am start -a xx -d uri启动应用时uri中&后的参数没有了-程序员宅基地

问题复现场景在mac或windows 下执行如下命令：adb shell am start -a android.intent.action.VIEW -d "https://xxx?action=tab&tabname=offer"发现应用在接收到intent后，intent中的参数变为“https://xxx?action=tab”。问题原因adb shell相当于是在li...