vb 编写的HTTP代理上网

VisualBasic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说，VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。VB的中心思想就是要便于程序员使用，无论是新手或者专家。VB使用了可以简单建立应用程序的GUI系统，但是又可以开发相当复杂的程序。VB的程序是一种基于窗体的可视化组件安排的联合，并且增加代码来指定组件的属性和方法。因为默认的属性和方法已经有一部分定义在了组件内，所以程序员不用写多少代码就可以完成一个简单的程序。过去的版本里面VB程序的性能问题一直被放在了桌面上，但是随着计算机速度的飞速增加，关于性能的争论已经越来越少。

窗体控件的增加和改变可以用拖放技术实现。一个排列满控件的工具箱用来显示可用控件（比如文本框或者按钮)。每个控件都有自己的属性和事件。默认的属性值会在控件创建的时候提供，但是程序员也可以进行更改。很多的属性值可以在运行时候随着用户的动作和修改进行改动，这样就形成了一个动态的程序。举个例子来说：窗体的大小改变事件中加入了可以改变控件位置的代码，在运行时候每当用户更改窗口大小，控件也会随之改变位置。在文本框中的文字改变事件中加入相应的代码，程序就能够在文字输入的时候自动翻译或者阻止某些字符的输入。

VB的程序可以包含一个或多个窗体，或者是一个主窗体和多个子窗体，类似于 *** 作系统的样子。有很少功能的对话框窗口（比如没有最大化和最小化按钮的窗体）可以用来提供d出功能。

VB的组件既可以拥有用户界面，也可以没有。这样一来服务器端程序就可以处理增加的模块。

VB使用参数计算的方法来进行垃圾收集，这个方法中包含有大量的对象，提供基本的面向对象支持。因为越来越多组件的出现，程序员可以选用自己需要的扩展库。和有些语言不一样，VB对大小写不敏感，但是能自动转换关键词到标准的大小写状态，以及强制使得符号表入口的实体的变量名称遵循书写规则。默认情况下字符串的比较是对大小写敏感的，但是可以关闭这个功能。

VB使得大量的外界控件有了自己的生存空间。大量的第三方控件针对VB提供。VB也提供了建立、使用和重用这些控件的方法，但是由于语言问题，从一个应用程序创建另外一个并不简单。

首先网页的开发是一个多语言的环境，前台有html css javascript，这些语言组成静态页面，后台有php asp jsp aspnet 等服务器端语言，用于写后台在服务器端运行的程序，看你写的代码，应该 是asp的程序， asp 一般都是用 vbscript写的，注意不是vb，vbscript是一种服务器端脚本语言是asp技术的通用的编程语言

不用。
IIS应用程序是一个 Visual Basic
应用程序，它在一个动态的、基于浏览器的应用程序中使用 HTML和已编译
Visual Basic 代码的组合。IIS应用程序驻留在一个 Web 服务器上，它接受来自浏览器的请求，运行与请求相关联的代码并返回响应到浏览器。
编写一个WEB界面dw比较适用，而不是vb6
使用vbnet写aspnet也不错。

服务端可以这样：
With Listen
Close
LocalPort = Text1Text ' (根据Text1中的数值来定监听端口 ( 假如为：4567 ) )
Listen
End With
客户端可以这样：
Winsock1Close
Winsock1Connect Text1Text, Text2Text '(Text1为要连接的服务器IP地址（服务端在本地可以为 127001）， Text2为服务端监听的端口 ( 4567 ) )

本篇文章通过与传统的设计方法相比较 介绍了如何在ASP代码中调用VB组件的方法 在本篇文章中 我们假设读者具有VB和ASP的相关入门知识 服务器端组件和客户端组件的比较 服务器端组件和客户端组件有许多不同之处 服务器端组件是在计算机服务器上注册的DLL文件 客户端组件则在浏览器运行的计算机上注册 在IE中 这些客户端组件被称作ActiveX浏览器插件组件 ActiveX客户端组件可以使用VB编写 并通过互联网或内联网发送给浏览器 生成很精彩的效果 问题是 ActiveX客户端组件只限于IE 而使用VB编写的服务器端组件则能够产生纯HTML代码 适用于所有的浏览器 服务器端组件的最大问题是该组件必须在Windows+IIS环境中或与IIS的API兼容的应用中运行 相比较而言 在服务器端实现这种兼容性似乎更容易一些 IIS服务器端组件驻留在与IIS相同的内存空间中 并随时准备服务器上处理的ASP网页的调用 从理论上说 我们可以在返回浏览器的ASP代码中插入任何文本或代码 但一般来说 大多数服务器端组件被用来处理需要大量时间的计算或数据库信息查找 然后将所得到的结果以HTML代码的形势返回给浏览器 VB组件的解析 由于本篇文章旨在讨论编写VB组件的基本方法 因此在能够说明问题的情况下 其中的例子将是十分简单的 在详细讨论编写VB组件之前 我们将首先从概念上对VB组件作一番剖析 在使用VB编写服务器端的组件时 有三个分层次的概念（在VB和ASP代码中都会用到）需要注意 ·Project名字 ·Class名字 ·Method名字 VB工程的名字就是Project名字 许多开发人员都将Project名字看作是组件名字 但VB只将它看作是工程的名字 在我们的例子中 Project名字是ExampleProject 当然了 我们可以随意命名自己的工程名字 Class名字名字是ExampleClass Method名字是ExampleMethod 工程名字（组件名字）也可以是由组件代码编译后得到的DLL文件的名字 该DLL文件将包含有被IIS用来向浏览器返回文本或HTML代码的经过编译的VB代码 方法名字指的是管理特定代码功能的VB代码部分 例如计算日期或显示数据库中所有作者的清单 组件方法有点角个黑盒子 它完成特定的工作或根据输入的信息返回特定的信息 一般情况下 在一个组件中可以有多个方法 为了更有效地管理组件的方法 可以将方法按照相似的分类组合在一起 这就是组件类的作用 组件类能够在内存中生成组件类代码的一个拷贝 在使用ASP代码创建对象时 它也被称作对象 这就是实例化 一旦有了组件类代码实例的对象引用 我们就可以从ASP代码中调用类中包含的方法 在我们的例子中 工程 类 方法的名字将用来在ASP代码中实例化VB组件 并以方法参数的形式从ASP代码中向VB代码传送值 在ASP代码中接收从VB方法中返回的值 从ASP文件中调用VB组件 我们用来调用VB组件的ASP文件将使用对象变量保存VB对象的引用 在ASP文件中 可以使用ASP Server对象的CreateObject()方法创建一个对象 该方法将返回一个它创建的对象的引用 在例子中 我们将使用objReference作为组件的对象变量 下面的代码显示ASP代码在实例化VB组件时需要使用组件的工程名和类名（ExampleProject和ExampleClass） 实例化VB组件的ASP代码 Set objReference = Server CreateObject( ExampleProject ExampleClass )　VB组件将从ASP代码中接受 个变量的值 并向ASP代码返回一个值 该值将存储在名字为strMethodReturn的ASP变量中 下面的代码显示出ASP代码是如何得到由VB组件返回的值的 它向VB方法传送三个名字分别为Param Param 和Parma 的三个参数值 strMethodReturn = objReference ExampleMethod(Param Param Param ) Param Param Param 这三个参数必须与VB组件中方法的定义完全相同 下面是二行实例化VB组件的类 并调用类的方法获得返回值的ASP代码的例子 Set objReference = Server CreateObject( ExampleProject ExampleClass )strMethodReturn = objReference ExampleMethod(Param Param Param ) 下面的图表直观地显示了VB组件的工程 类和方法名字是如何与ASP文件中的组件实例化代码协调的 在逐步地学习如何编写例子中的VB代码和ASP文件时 可以将下面的图表作为参考 VB方法的作用 我们例子中简单的VB组件将获得用户的名字和年龄 然后返回一个以天计的用户的年龄 而且有一个可选项 能够提醒某个用户是否已经超过了 岁 如果我们向组件传送一个虚构的Eric Clapton作为方法的第一个参数值 将第二个参数设置为 我们将得到下面的返回字符串 Eric Clapton is over days old 如果我们将可选的第三个参数设置为True（这一参数将使方法判断用户是否已经超过 岁） 我们将会得到下面的返回字符串 Eric Clapton is over days OLD 由于使用了三个完全不同的变量━━用户的姓名 年龄以及表示他们是否超过了 岁 因此我们需要使用三个方法参数将这些信息从ASP文件传送给VB代码 在VB中 考虑要使用哪些数据类型是十分重要的 我们将使用一个名字为strName的字符串型变量表示用户的姓名 名字为intAge的整型变量表示用户的年龄 名字为blnAgeEmphasisOn的布尔型变量表明用户是否已经超过了 岁 三个方法参数（传送给VB组件的方法代码的变量） 在VB中创建服务器端组件 启动VB后 在 新工程 窗口中双击 ActiveX DLL 图标 一旦VB加载了新的ActiveX DLL工程 至少会看到二个打开的窗口 工程窗口和属性窗口 如果有一个窗口显示不出来 可以从VB的菜单中选择 查看 菜单项（分别使用 查看 > 工程管理器 查看 > 属性窗口 ） 由于VB对第一个工程和类的缺省命名分别是Project Class 我们可以将它们分别改为ExampleProject 和ExampleClass 工程名字的修改可以在工程窗口中进行 在工程窗口中新输入的工程名字左侧有一个带有+或 的小方框 如果显示的是+号 选择该小方框 +号就会变成 号 缺省的类名（Class ）就会显示在工程名字的下面 在工程窗口中选择缺省的类名 在属性窗口中将缺省的类名修改为ExampleClass 在保存工程时 VB会将包含类的代码保存在一个扩展名为CLS的文件 工程文件的扩展名为VBP 其中存储有工程的各种设置 文件名和文件存储的位置 服务器端组件的属性值 在属性窗口中显示ExampleClass类的属性 注意Instancing属性的值为 MultiUse 如果将工程的类型设置为标准的EXE工程 该属性的值就会随之发生改变 在VB的菜单中选择 工程 > ExampleProject属性 就会显示出工程属性窗口 在 常规 标签的右下端的 线程模式 属性的值应当被设置为 单元线程 这将使多个访问者能够同时使用我们的组件类的不同的实例 另外 选择 无人值守执行 和 驻留内存 二个选项 避免VB 中的内存泄露问题 VB方法的代码 现在我们就需要使用VB的代码窗口来输入VB代码了 如果代码窗口还是一片空白 那就输入下面的代码好了 Option Explicit　 它将要求我们必须定义所有的变量 Public Function ExampleMethod(ByVal strName As String _　 ByVal intAge As Integer _　Optional ByVal blnAgeEmphasisOn As Boolean = False) As String 在上面的代码中 我们将方法定义成了一个Public函数 这意味着该组件之外的任何代码都能够调用它 由于是一个函数 它还会向调用它的代码返回一个值 Public Function ExampleMethod() As String　上面的代码表示ExampleMethod()函数将向它的调用者返回一个字符串类型的值 我们的VB方法带有 个从ASP代码接受值的参数变量 最后一个参数变量是可选的 所有用来从VB组件之外接收值的参数变量都需要在VB方法的括号间定义和使用 我们可以象在方法内定义的变量那样使用以这种方式定义为方法参数的变量 二者之间唯一的区别是外面的ASP代码来决定它们的值 下面是三个变量和它们的数据类型 ByVal strName As String　 ByVal intAge As Integer　Optional ByVal blnAgeEmphasisOn As Boolean = False上面的代码定义了三个方法参数的数据类型 指明它们是按值传送的 而且第三个参数是可选的 如果没有第三个参数 则其缺省值为False 然后 我们将在方法的定义中添加一些必要的逗号 空格和底划线（_） 这样才能符合VB的语法要求 我们将把参数列表放在方法定义的括号中间 得到的方法定义如下 Public Function ExampleMethod(ByVal strName As String _ ByVal intAge As Integer _Optional ByVal blnAgeEmphasisOn As Boolean = False) As lishixinzhi/Article/program/net/201311/12678

---