乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 187|回复: 11

帮助设置路径

[复制链接]

19

主题

35

帖子

5

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2012-8-1 10:45:53 | 显示全部楼层 |阅读模式
您好,沼泽成员,
我正在尝试更新我的VBA代码中的路径。当前路径设置为Private Const fileX="c:\Temp\MyFile.txt",我想将其更改为用户Windows系统变量%tmp%。
有人能帮助我进行此更改吗......??非常感谢您的帮助。
问候,
Vince

本帖以下内容被隐藏保护;需要你回复后,才能看到!

游客,如果您要查看本帖隐藏内容请回复
回复

使用道具 举报

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2012-8-1 18:04:39 | 显示全部楼层
考虑环境功能;伪代码(未测试的):    Private Const fileX = Environ(" TMP ")& " \ " & " my file . txt " 。

回复

使用道具 举报

7

主题

100

帖子

7

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
135
发表于 2012-8-1 18:25:21 | 显示全部楼层
您只需将 const 设置为该字符串,但并非所有文件夹/路径操作都会将该字符串计算为有效路径。所以这取决于你想用这个const做什么。
回复

使用道具 举报

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2012-8-1 18:51:42 | 显示全部楼层
考虑到这可能是一个内部应用程序,其中IT部署了用户配置文件,使用TMP变量路径并不牵强。
如果这是一个问题,请在初始化期间对有效路径使用简单的FSO测试。
回复

使用道具 举报

19

主题

35

帖子

5

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2012-8-2 07:45:01 | 显示全部楼层
基本上,我想将MyFile.txt保存到登录temp文件夹"C:\User\Vincent Ferrara\AppData\Local\Temp"的用户。
回复

使用道具 举报

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2012-8-2 09:49:16 | 显示全部楼层

这篇文章有什么帮助吗?
回复

使用道具 举报

19

主题

35

帖子

5

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2012-8-2 12:32:17 | 显示全部楼层
嗨,RenderMan,
当我尝试你的建议时,我得到以下错误:
  1. Compile Error:
  2. Method or Data Member Not Found

问候,
文斯
回复

使用道具 举报

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2012-8-2 12:48:20 | 显示全部楼层
好吧,这取决于您如何将信息放入您的应用程序如果您复制了上面的信息,您可能会收到错误,因为VBA正在尝试将MyFile解释为对象,将. txt解释为方法或属性。文件名也必须用引号。
试试这个...
  1. Private Const fileX = Environ("TMP") & "\MyFile.txt"

回复

使用道具 举报

4

主题

54

帖子

5

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2012-8-2 16:23:51 | 显示全部楼层
我不认为您可以在常量中使用像Environ()这样的函数。您不需要将fileX调暗为字符串吗?
回复

使用道具 举报

86

主题

744

帖子

6

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1092
发表于 2012-8-2 16:31:33 | 显示全部楼层
这可能会有所帮助。
http://en.kioskea.net/faq/951-vba-vb6-my-documents-environment-variables
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-6-30 04:54 , Processed in 1.027707 second(s), 73 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表