编辑一个脚本自动运行软件并且点击回车

首先使用VB建立两个程序，一个为客户端程序Client，一个为服务器端程序systry。

在Client工程中建立一个窗体，加载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程序破坏别人的系统。

【e语言有什么用】易语言软件是干什么用的？普通人可以用得着吗？...

易语言是由飞扬工作室出品的 Windows 环境下的全中文实用电脑程序编写语言，她支持现今所有的 Windows 32 位操作系统，即：Windows 9X、ME、2000、NT 等，提供了中国电脑用户开发 Windows 应用程序最方便直观、快捷实用的方法，适合于初中级别电脑用户使用。

尤其是根本不懂英文或者英文了解很少的初级用户，可以通过使用本语言极其快速地进入 Windows 程序编写的大门。

易语言与其它编程语言相比，具有以下主要优点：全可视化支持；全中文支持；易语言由基本系统和运行支持库两部分组成，两者之间通过使用飞扬工作室自行定义的接口技术进行协作；即时编译并自动规范格式的语句录入方式；系统内置的自动名称管理器能够对用户所定义的各类名称进行跟踪管理；贯穿全程的即时且全面的信息帮助。

简单的说，是计算机高级语言的一种，用于程序设计，适合初学程序设计的人使用。

如果你不从事应用软件开发，仅是进行文档处理或CAD、PHOTOSHOP、财务软件、游戏等应用软件的实际操作，可以不学。

但如果你今后要从事程序设计工作或你所从事的工作没有很好的应用软件，掌握一门计算机语言还是有必要的，易语言可以作为一种选择，但个人建议从VB学起，因绝大多数的计算机语言还是用英文的，学会VB后更容易进一步学习。

C语言编程后按ENTER自动关闭

易语言具体说来没开发出什么大型的出名的软件 都是些小软件 主要还是由于偏爱易语言的大部分不是所谓的电脑高手，真正从事编程的技术人员都不会选择易语言，相反一些编程知识掌握不够，水平不够强的人就会选择易语言，因为易于上手简单易懂，就算是个没有一点点编程知识的人也可以学会，当然他们学会了大程序肯定是编辑不出来的了，基本都是开发一些小型软件，开发一些大型软件的辅助软件，像游戏辅助之类

转载请注明出处51数据库 » e语言自动按回车软件