我想获取VB文件夹下的所有XML文件
解决方案 »
- 好几天没发贴了,老事重谈,讨论一下如何写代码以提高运行效率
- 求高手帮助!!!!至少一个参数没有被指定!!!!在线等!!
- 一个VC字符问题
- 用VB程序如何在EXCEL中插入图片?
- Access的简单问题.真的很菜! 在线等待。。。。。。
- 如何通过WMI获取当前打开的所有窗口标题?
- 请问treeview中如何得知那一个节点被选中了(用键盘和鼠标)
- 真的很急,一个星期能学会ASP么?散分!!
- 关于填充色的问题
- 我用MSComm控件拨号,有时成功,有时又不行。Why?
- jiangsheng等高手进:WIN7下用IShellBrowser在WebBrowser中打开本地目录,如何让新文件夹在当前窗口打开?
- 如何实现卸载除mdi主窗体外的所有窗体呢?(主窗体不能卸载)
循环历遍即可.
Dim sfile As String
spath = "vb路径\*.xml"
sfile = Dir(spath)
While sfile <> ""
sfile = Dir()
Wendlz参照自己改改吧。
shell("cmd /c dir /b /s /a-d d:\文件夹\*.xml >d:\allxml.txt")
'然后读d:\allxml.txt的内容