欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → [求助]VBA，请问如何清除INI文件某个栏目下的全部内容？

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有4007人关注过本帖树形打印复制链接

主题：[求助]VBA，请问如何清除INI文件某个栏目下的全部内容？
帅哥哟，离线，有人找我吗？
michaelyjy
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 ateam
等级：论坛游侠 帖子：414 积分：0 威望：0 精华：0 注册：2016/12/8 10:33:23 		[求助]VBA，请问如何清除INI文件某个栏目下的全部内容？  发帖心情 Post By：2018/6/21 14:33:38 [只看该作者]

WritePrivateProfileFloat("MyCpp", "Stock", Data, "C:\Stock.ini")

如何清除MyCpp下面的所有内容？谢谢 
 回到顶部
帅哥哟，离线，有人找我吗？
无为剑
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：2437 积分：0 威望：0 精华：0 注册：2016/3/5 22:53:41 		  发帖心情 Post By：2018/6/21 15:37:42 [只看该作者]

这个做不到，你可以考虑将不同的Mycpp的组单独做成不同的ini文件，这样需要清除时删除该ini文件即可

 回到顶部
帅哥哟，离线，有人找我吗？
guotx2010
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蜘蛛侠 帖子：1366 积分：5210 威望：0 精华：7 注册：2010/12/11 18:00:33 		  发帖心情 Post By：2018/6/22 13:41:01 [只看该作者]

这个我实现过，就是用一个临时文件来过渡，先读取要清理的ini文件，把需要的内容写到新ini文件，不需要的不写，然后将临时文件复制到原ini文件，覆盖就可以了，最后把临时文件删除。
 回到顶部
帅哥哟，离线，有人找我吗？
michaelyjy
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 ateam
等级：论坛游侠 帖子：414 积分：0 威望：0 精华：0 注册：2016/12/8 10:33:23 		  发帖心情 Post By：2018/6/22 13:53:39 [只看该作者]

好的谢谢

 回到顶部
帅哥哟，离线，有人找我吗？
michaelyjy
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 ateam
等级：论坛游侠 帖子：414 积分：0 威望：0 精华：0 注册：2016/12/8 10:33:23 		  发帖心情 Post By：2018/6/25 9:51:02 [只看该作者]

请问如何通过VBA程序删除INI文件

 回到顶部
帅哥哟，离线，有人找我吗？
无为剑
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：2437 积分：0 威望：0 精华：0 注册：2016/3/5 22:53:41 		  发帖心情 Post By：2018/6/25 11:27:49 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
michaelyjy
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 ateam
等级：论坛游侠 帖子：414 积分：0 威望：0 精华：0 注册：2016/12/8 10:33:23 		  发帖心情 Post By：2018/7/16 13:47:31 [只看该作者]

我用kill不行，好像金字塔不支持还是什么。

kill "D:\test.ini"
 回到顶部
帅哥哟，离线，有人找我吗？
yukizzc
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：21598 积分：0 威望：0 精华：1 注册：2010/7/31 16:35:30 		  发帖心情 Post By：2018/7/16 14:28:42 [只看该作者]

 

strFile = "D:\aa.INI"
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile strFile
 回到顶部
帅哥哟，离线，有人找我吗？
michaelyjy
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 ateam
等级：论坛游侠 帖子：414 积分：0 威望：0 精华：0 注册：2016/12/8 10:33:23 		  发帖心情 Post By：2018/7/16 14:32:02 [只看该作者]

好的谢谢

 回到顶部
帅哥哟，离线，有人找我吗？
michaelyjy
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 ateam
等级：论坛游侠 帖子：414 积分：0 威望：0 精华：0 注册：2016/12/8 10:33:23 		  发帖心情 Post By：2018/7/23 8:10:25 [只看该作者]

请问如何判断 "D:\aa.INI"这个文件是否存在？若存在就删除。

 回到顶部
总数 12 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.07813 秒, 5 次数据查询