如何设置当前应用的默认路径

yorgo 2003-10-10 11:30:26
我想修改当前的路径，让一些外部程序在某个路径下运行

现在遇到的问题是
1、shell可以运行外部程序，但是无法指定程序运行目录，我希望可以指定一下目录
2、shellexecute可以指定目录运行，但是执行成功后不返回pid，我希望得到pid从而可以控制外部运行程序的执行情况。
...全文
346 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
yorgo 2003-10-15
  • 打赏
  • 举报
 回复
已经使用createprocess解决问题
yorgo 2003-10-12
  • 打赏
  • 举报
 回复
我用动态产生.bat文件暂时解决了问题。

to rainstormmaster

shell 指定的路径+文件名 可以执行程序，但是环境中程序执行的路径还在app.path下呢，我要求程序执行的时候，默认路径为执行程序所在目录或者是指定目录。

我会尝试使用createprocess看看可不可以
oxfordxyc 2003-10-12
  • 打赏
  • 举报
 回复
学习中……
kmzs 2003-10-12
  • 打赏
  • 举报
 回复
shell <全路径〉，<参数>
luolovegui 2003-10-12
  • 打赏
  • 举报
 回复
chdir()
yorgo 2003-10-12
  • 打赏
  • 举报
 回复
从网上下载一个xxx.zip的文件，为了不在客户端使用zip相关函数，所以改成xxx.exe的自解压包，设定自解压目录为默认目录。

实现的程序就是将这个自解压包下载到本地，然后调用执行这个自解压数据包。

现在的问题就是：如果你单纯运行了那个自解压数据包的话，他会将东西解压到app.path目录下。如果你使用shellexecute的指定运行目录的话，可以解压到你指定的目录，但是shellexecute不返回pid，你没有办法控制等解压完了以后在执行下面的程序。

我的思路没有变
rainstormmaster 2003-10-12
  • 打赏
  • 举报
 回复
不知道你要实现什么功能，能详细说说吗？

我怀疑楼主的思路已经偏了
yorgo 2003-10-10
  • 打赏
  • 举报
 回复
那个程序有特定用途，不能copy到app.path下面运行的，必须要在指定的路径运行，并且vb要等待运行完才继续下面的操作
wangchong 2003-10-10
  • 打赏
  • 举报
 回复
你可以把要用的程序放在安装目录下！再用APP.PATH 目录 调用！
mgan 2003-10-10
  • 打赏
  • 举报
 回复
旧这个可以搞定啊
shell 指定的路径+文件名


————————————
GOOD GOOD STUDY
DAY DAY UP
——————————
flc 2003-10-10
  • 打赏
  • 举报
 回复
学习
rainstormmaster 2003-10-10
  • 打赏
  • 举报
 回复
//那个程序有特定用途，不能copy到app.path下面运行的，必须要在指定的路径运行

shell 指定的路径+文件名

解决不了你的问题吗？
rainstormmaster 2003-10-10
  • 打赏
  • 举报
 回复
shellexecute和shell都不行的话，就用功能最强大的CreateProcess

VB声明
Declare Function CreateProcess Lib "kernel32" Alias "CreateProcessA" (ByVal lpApplicationName As String, ByVal lpCommandLine As String, lpProcessAttributes As SECURITY_ATTRIBUTES, lpThreadAttributes As SECURITY_ATTRIBUTES, ByVal bInheritHandles As Long, ByVal dwCreationFlags As Long, lpEnvironment As Any, ByVal lpCurrentDriectory As String, lpStartupInfo As STARTUPINFO, lpProcessInformation As PROCESS_INFORMATION) As Long
说明
创建一个新进程（比如执行一个程序）
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参数表
参数 类型及说明
lpApplicationName String，要执行的应用程序的名字。可设为vbNullString；在这种情况下，应用程序的名字应在lpCommandLine参数的起始处出现
lpCommandLine String，要执行的命令行。可用GetCommandLine函数取得一个进程使用的命令行。Windows会尽可能地根据下述搜索顺序来查找执行文件：
（1）包含了父进程执行文件的目录
（2）父进程当前的目录
（3）由GetSystemDirectory返回的系统目录
（4）仅适于windows NT：16位系统目录
（5）由GetWindowDirectory返回的Windows目录
（6）由PATH环境变量指定的目录
lpProcessAttributes SECURITY_ATTRIBUTES，指定一个SECURITY_ATTRIBUTES结构，或传递零值（将参数声明为ByVal As Long，并传递零值）——表示采用不允许继承的默认描述符。该参数定义了进程的安全特性
lpThreadAttributes SECURITY_ATTRIBUTES，指定一个SECURITY_ATTRIBUTES结构，或传递零值（将参数声明为ByVal As Long，并传递零值）——表示采用不允许继承的默认描述符。该参数定义了进程之主线程的安全特性
bInheritHandles Long，TRUE表示允许当前进程中的所有句柄都由新建的子进程继承
dwCreationFlags Long，来自API32.TXT文件的一个或多个下述常数之一，它们都带有前缀CREATE_。下面这些用于VB程序员：
CREATE_SEPARATE_WOW_VDM（仅适用于NT） 启动一个16位的Windows应用程序时，强迫它在自己的内存空间运行
CREATE_SHARED_WOW_VDM（仅适用于NT） 启动一个16位的Windows应用程序时，强迫它在共享的16位虚拟机（VM）内运行
CREATE_SUSPENDED 立即挂起新进程。除非调用了ResumeThread函数函数，否则它不会恢复运行
也可能是下述常数之一，用于指定优先级
IDLE_PRIORITY_CLASS 新进程应该有非常低的优先级——只有在系统空闲的时候才能运行。基本值是4
HIGH_PRIORITY_CLASS 新进程有非常高的优先级，它优先于大多数应用程序。基本值是13。注意尽量避免采用这个优先级
NORMAL_PRIORITY_CLASS 标准优先级。如进程位于前台，则基本值是9；如在后台，则优先值是7
不要在VB中使用REALTIME_PRIORITY_CLASS
lpEnvironment Any，指向一个环境块的指针（环境缓冲区的头一个字符，或者环境块的地址）
lpCurrentDriectory String，新进程的当前目录路径。调用函数的时候，可用vbNullString指定当前目录
lpStartupInfo STARTUPINFO，指定一个STARTUPINFO结构，其中包含了创建进程时使用的附加信息
lpProcessInformation PROCESS_INFORMATION，该结构用于容纳新进程的进程和线程标识符。大多数情况下，一旦这个函数返回，父应用程序都会关闭两个句柄。

Top

suonety 2003-10-10
  • 打赏
  • 举报
 回复
ChDrive App.Path
ChDir App.Path
AI算力时代的先进封装：Chiplet、HBM与异构集成的产业机会.docx
AI算力时代的先进封装：Chiplet、HBM与异构集成的产业机会
JavaWeb程序设计作业答案.rar
源码下载地址： https://pan.quark.cn/s/8d2c461c797c JavaWeb程序设计构成了掌握Web交互式应用程序开发的核心领域，对于初学者来说，精通这一技术具有决定性意义。在“JavaWeb程序设计（第三版）作业答案”中，我们可以预期获得针对该教材习题的一系列深入解析，从而协助学习者强化知识体系。 JavaWeb所包含的技术组件涵盖了Servlet、JSP（JavaServer Pages）、JDBC（Java Database Connectivity）以及各类框架如Spring MVC、Struts等。Servlet是Java平台提供的一种扩展服务器功能的接口，能够处理HTTP请求并生成相应的反馈。JSP则是一种用于构建动态网页的工具，它支持开发者将HTML代码与Java代码进行整合编写，从而简化了Web应用程序的开发流程。 作业答案通常会涉及以下几个核心内容： 1. **Servlet基础**：可能包含Servlet生命周期、init(), service(), destroy()方法的应用，以及如何在web.xml文件中设定Servlet的映射关系。 2. **JSP基础**：JSP的九大内置对象，如request、response、session、application等的使用，以及EL（Expression Language）和JSTL（JavaServer Pages Standard Tag Library）的实际操作。 3. **HTTP协议理解**：GET和POST请求方法的差异，请求头与响应头的应用，以及会话管理的概念阐释。 4. **JDBC数据库操作**：与数据库建立连接，执行SQL指令，处理查询结果集，以及...
斐讯K2固件合集-下载即用.zip
源码链接： https://pan.quark.cn/s/a4b39357ea24 斐讯K2是一款广受用户青睐的无线路由器，其运行表现稳定且具备较高的可操作性，在DIY爱好者群体中拥有极高的声誉。本资料将系统性地阐述斐讯K2的固件刷机方法及其关联的技术要点。固件升级是路由器爱好者改善设备性能、扩展功能的一种普遍手段，经由替换出厂固件，能够达成更加个性化的网络配置、增强安全防护等目标。斐讯K2固件资源库涵盖了多种知名的非官方固件，诸如Tomato Pheonix 不死鸟、高恪、PandoraBox 潘多拉等，这些固件均具备独特的优势，能够适配不同用户的需求。 1. Tomato Pheonix 不死鸟：Tomato是一款立足于Linux的开源固件，以其精巧、高效而备受推崇。不死鸟版本是专门为华硕及斐讯路由器优化的分支，提供了卓越的QoS（服务质量）配置、详尽的图表监控以及便捷的固件升级途径。对于那些需要精准调控带宽和监测网络状态的用户而言，这是一个理想的选项。 2. 高恪：高恪固件是OpenWrt的定制化版本，着重于操作的便捷性和运行的可靠性，特别适合对路由器操作不甚熟悉的用户群体。它提供了一些实用的功能，例如内置的广告屏蔽、快速测速工具等，同时保留了OpenWrt的适应性。 3. PandoraBox 潘多拉：潘多拉盒是另一款基于OpenWrt的固件，它以丰富的插件库和强大的自定义潜力而闻名。用户能够依据个人需求安装各类插件，实现更多功能，如远程接入、DDNS（动态域名解析服务）等。 4. 官方固件的纯净版本与定制版本：官方固件通常更侧重于稳定性，纯净版意味着未预置额外的应用或服务，适合注重稳定性的用户。定制版则可能包含了制造商的特色功能或优...
docker use CMD or ENTRYPOINT to start multiple services simultaneously
源码下载地址： https://pan.quark.cn/s/a4b39357ea24 在django框架中集成了celery功能，针对在启动django应用程序时如何使celery服务同步运行的问题，可通过ENTRYPOINT指令来实现启动。具体步骤如下：一、创建Dockerfile文件，基础镜像选用centos:7版本，执行localedef命令配置中文语言环境，设置环境变量LC_ALL为zh_CN.UTF-8，将项目代码复制到指定目录，并赋予运行脚本执行权限，最后安装项目所需依赖包。$ FROM centos:7 $ RUN localedef -c -f UTF-8 -i zh_CN zh_CN.utf8 $ ENV LC_ALL zh_CN.UTF-8 $ COPY ./hrms $CODE_DIR/hrms/ $ COPY ./run $CODE_DIR/run/ $ RUN chmod a+x $CODE_DIR/run/* $ RUN pip3 install -r $CODE_DIR/hrms/requirements.txt
资料辅助存档助手v1.3.1
1. 分组解析不再生成.txt文件，Excel文件复用性提升； 2. 汇总表生成自动过滤理论成绩与质量实训成绩，变更次日签到状态； 3. 收费表支持后续签到人员信息增量追加，保留已手动补充人员的信息； 4. 输入框均保留上一次输入过的历史记录，统一按钮样式； 5. 右键菜单支持多种配色风格自由切换。
VB基础类

7,788

社区成员

197,583

社区内容

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章