乐筑天下

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

[编程交流] How to Determine User's L

[复制链接]

180

主题

639

帖子

463

银币

中流砥柱

Rank: 25

铜币
897
发表于 2022-7-6 06:21:19 | 显示全部楼层 |阅读模式
Good news from at least one part of the economy. They have hired three new detailers for this department and the IT guys built some new computers for them. For some reason, the IT likes to build the new systems with a D:\ main drive, not C:\....just to be silly I guess.
 
So my question is that somewhere I once saw a short routine whereby the LISP program determined what was the main drive, as well as the other drives in the Windows PATH variable. Does anyone have a line on this?
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-6 06:49:13 | 显示全部楼层
Try this ...
  1. [font=Arial][size=2](getenv "SystemDrive")[/size][/font][b][font=Arial][size=2][/size][/font][/b]
回复

使用道具 举报

16

主题

231

帖子

217

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
83
发表于 2022-7-6 07:03:12 | 显示全部楼层
Off topic.
 
This is because most hackers or viruses try to access the C: drive on computers. By changing it over to a less common drive letter the less likely it is to be hacked.
回复

使用道具 举报

180

主题

639

帖子

463

银币

中流砥柱

Rank: 25

铜币
897
发表于 2022-7-6 07:16:26 | 显示全部楼层
Thanks. I can use that. What I saw some months ago was a snippet where someone used mapcar to look through a list of drives to find out which ones were in the user's path. I searched and found this http://hyperpics.blogs.com/beyond_the_ui/2005/12/which_drives_ar.html but it's a rather complex block compared to what I saw before. The code was done by a programmer who worked here several years ago. They tell me she left under bad terms so don't plan on asking her for advice.
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-6 07:22:31 | 显示全部楼层
This may be helpful
 
  1. (vl-load-com)(setq *files*  (vla-get-files  (vla-get-preferences (vlax-get-acad-object))))(setq paths (vla-get-SupportPath *files*))(princ paths)
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-10 18:53 , Processed in 0.783888 second(s), 62 queries .

© 2020-2025 乐筑天下

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