| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1027 人关注过本帖
标题:求助,请高手指点!!
取消只看楼主 加入收藏
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
结帖率:100%
收藏
 问题点数:0 回复次数:3 
求助,请高手指点!!
本人初学,今天第一次看vb编程,以下面方式实发送信息界面:  
   text1,text2,comand1,comand2
_______________________________________
 if text2.text="" then
      msgbox"请先输入信息!”
   else
      dim asdf
      asdf = shell ("c\windows\system32\net.exe send ltcw10 " & text2.text, vb_hidden)
      text2.text=""
   endif
end sub
_________________________________________________
 可以向对方发送text2里的信息,但只能单对ltcw10发,
改成下面为何不可:

if text2.text="" then
      msgbox"请先输入信息!”
   else
      dim asdf
      asdf = shell ("c\windows\system32\net.exe send " & text1.text & text2.text, vb_hidden)
      text2.text=""
   endif
end sub

其中,net send ltcw10  hello! 可在2K或XP下给LTCW10发“HELLO!”的信息!
请指点哪里错,怎样可实现!谢谢
搜索更多相关主题的帖子: windows 
2005-03-14 21:08
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
收藏
得分:0 
靠,竟沒有人願意幫我,
我已經搞好了,
原來是VB不能視別空格,要把& text1.text &text2.text改成 &text1.text & " " & text2.text

http://toorup.3v.do
loading...
2005-03-15 10:17
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
收藏
得分:0 
那是用來調用系統命令NET的!

http://toorup.3v.do
loading...
2005-03-16 16:51
icecool
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:20
帖 子:1216
专家分:1376
注 册:2005-3-14
收藏
得分:0 
老大說的不會用
也不懂,我還沒看到系統函數這裡!

http://toorup.3v.do
loading...
2005-03-21 11:33
快速回复:求助,请高手指点!!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013513 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved