社区
网络编程
帖子详情
VB生成后运行弹出cmd窗口
「已注销」
2017-01-26 09:46:37
VB生成后运行弹出cmd窗口,关掉窗口后程序也相应的关掉了。。。调试没问题
...全文
296
5
打赏
收藏
VB生成后运行弹出cmd窗口
VB生成后运行弹出cmd窗口,关掉窗口后程序也相应的关掉了。。。调试没问题
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
「已注销」
2017-02-03
打赏
举报
回复
知道怎么回事了,是本来我想做外接程序打包安装卸载程序,不小心选得其他选项,现在修改过来可以正常运行了
threenewbee
2017-01-31
打赏
举报
回复
是不是有程序没有结束,强制结束进程
舉杯邀明月
2017-01-31
打赏
举报
回复
楼主的代码有问题吧。
专注VB编程开发20年
2017-01-27
打赏
举报
回复
中毒太深了吧你好需要什么
「已注销」
2017-01-26
打赏
举报
回复
刚发了帖子去百度查资料,结果第一条就是我这个。。。我去
VB
制作ASP组件_阿里西西视频录像
由本人第一次尝试制作的录像视频教程,由于电脑速度较慢,播放时间较慢,请谅解。 本录像讲解最基础的
VB
封装ASP代码
生成
DLL的制作教程,适合初级学习者参考。也是本人学习
VB
制作ASP组件的第一个尝试,录像基本成功。 用
vb
编写asp组件(dll)示例 下面,将演示如何使用
vb
制作asp的dll组件... 1. 启动你的
vb
,选择activex dll图标,然后在点击菜单的工程>>引用,接 着在
弹出
的"引用"
窗口
从中选择 microsoft active server pages object library. 2. 给工程和类重命名,在asp中调用时,就全靠它了^_^!我们的工程名改 为aspdll,类名为demo.在asp中调用的方法是: set objreference = server.createobject("工程名.类名") 本例调用的相应代码如下: set objreference = server.createobject("aspdll.demo") 调用的方法和一般常见的,比如fso等组件的方法一模一样. 心动了吧,呵呵,下面我们继续.... 3. 接着,我们开始编写代码,打开我们刚才新建工程类
窗口
,第一步,先声 明我们要用到的变量.主要是在
vb
声明替代asp几大对象的变量名,定义这 asp的几大对象后,我们就可以像在asp环境中调用类似request,server等 这样的几大对象了.(声明的变量名完全可以和asp对象名一样)代码如下: '********************************************** private mys criptingcontext as s criptingcontext private myapplication as application private myrequest as request private myresponse as response private myserver as server private mysession as session '********************************************** 4. 声明完变量后,我们必须在类中写onstartpage子函数.本函数的作用是 当用户访问一个带有本组件的asp文件时,iis就会把s criptingcontext传 送给我们
vb
组件对象.这个s criptingcontext包括了全部的asp方法和属性 .这样,就使得我们有能力访问所有asp的对象.代码如下: '***************************************************************** public sub onstartpage(passeds criptingcontext as s criptingcontext) set mys criptingcontext = passeds criptingcontext set myapplication = mys criptingcontext.application set myrequest = mys criptingcontext.request set myresponse = mys criptingcontext.response set myserver = mys criptingcontext.server set mysession = mys criptingcontext.session end sub '***************************************************************** 通过上面的函数,我们在asp中调用本组件后,上面的几大对象就完全可以 像平时我们在asp使用一样了,举个例子: 在asp中实现接收提交的表单值并输出屏幕: <% formvalue=request.form("username") response.write ("你提交的用户名是"&myformvalue&",欢迎您!") %> 在
vb
中实现方法是: formvalue=myrequest.form("username") myresponse.write ("你提交的用户名是"&myformvalue&",欢迎您!") 5. 相对应于onstartpage函数,我们还要编写一个关闭onstartpage中对象 的onendpage函数,代码如下: '********************************* public sub onendpage() set mys criptingcontext = nothing set myapplication = nothing set myrequest = nothing set myresponse = nothing set myserver = nothing set mysession = nothing end sub '******************************** 6.通过编写上面的代码,我们在
vb
中编写asp组件实例的环境已经具备了, 下面,我就尝试写两个与asp中基本相类似的函数,也就是说,关键部位就在 这里了,你完全可以把你所有的asp源码封装在这里... 先写个最简单的输出屏幕信息函数: '******************************************** public sub welcomeinfo() myresponse.write ("阿里西西_web开发,欢迎访www.alixixi.com!") end sub '******************************************** 再写个带参数传递及显示now()现在时间的函数: '********************************** public sub setinfo(content as string) myresponse.write content & "
" myresponse.write "现在的时间是:" & now() end sub '********************************** 通过上面的asp代码实例,你会发现其实这和asp源码基本没有区别^_^ 7. 好了,整个类就编写完了,我们开始打包封装成dll.我们先保存工程, 这里我们保存到e:\
vb
dll,接着选择菜单上的文件>>
生成
aspdll.dll,很 快的dll组件就封装并
生成
完毕了. 8.
生成
dll文件后,我们开始调试和使用.在系统
运行
栏输入
cmd
,进入dos 命令行状态,我们要注册刚才
生成
的dll组件,注册方法是可以直接输入 regsvr32 e:\
vb
dll\aspdll.dll ,为了安装方便,你同时可以写个批处理 文件,这里不一一举例了...好,注册成功! 9.注册完dll组件后,我们针对刚才的组件,按照上面介绍过的方法编写一 个asp文件来调试.代码如下: <% set redll = server.createobject("aspdll.demo") redll.welcomeinfo response.write "
" redll.setinfo("传递参数到服务器组件,并返回值及当前日期now()!") response.write "
" set redll = nothing %> 在iis中打开此文件,屏幕显示:
Visual Basic调用
CMD
Visual Basic调用
CMD
快速教学
用bat脚本
运行
程序,并影藏
cmd
窗口
代码如下: @echo oFF ::code by LZ-MyST QQ:8450919 BLOG:http://hi.baidu.com/lzmyst http://www.clxp.net.cn if "%1" neq "1" ( >"%temp%\tmp.
vb
s" echo set WshShell = WScript.CreateObject^(^"WScript.Shell...
VisualStudio
运行
程序,点击应用程序时,
弹出
多个个窗体问题
如果是发送一个请求,
弹出
两个窗体,原因是调用两次窗体。
VB
实现向
窗口
发送按键消息
VB
实现向
窗口
发送按键消息 : 嵌入式模拟键盘 待解决问题
vb
WM_KEYDOWN 参数设置???? id=“question_content”>Private Declare Function FindWindow Lib “user32” Alias “FindWindowA” (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function PostMessage Lib
网络编程
1,502
社区成员
18,439
社区内容
发帖
与我相关
我的任务
网络编程
VB 网络编程
复制链接
扫一扫
分享
社区描述
VB 网络编程
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章