用VB编写ActiveX DLL实现ASP编程
ASP是目前一种广为应用的用来快速构建动态WEB站点的编程语言，默认的内置开发语言是VBScript，由于ASP和微软Windows系列操作系统的结合非常的好，使得ASP已经成为了NT开发平台上面进行WEB开发的首选语言和环境。
他有着简单易学，方便快速开发的种种优点，但是他也有着致命的弱点，就是他是脚本语言解释执行的，速度会受到一定的影响，更为关键的是，使用ASP来开发完成一个项目之后，整个项目在交付客户使用的时候，是会连带所有的ASP脚本源代码的，也就无法将商业程序保密了，源代码泄漏会给自己造成很大的损失，虽然微软也相应的推出了用来加密ASP程序的软件，但是有着诸多的限制，以及会降低程序运行的速度和二次开发调试的难度，难道ASP做出来的项目就真的要暴露所有的源代码吗?
当然了，答案当然是否定的，因为世界上没有绝对不可能的事情，接下来就跟随我来看看如何利用VB的ActiveX DLL来实现将ASP程序封装起来吧，也就是我们可以使用ActiveX DLL来完成所有ASP能完成的事情，而ActiveX DLL是编译好的DLL文件，别人是无法得知你的源代码的，也就保证的自己的商业机密和核心技术，并且达到同样的效果，使用完全封装的ActiveX DLL会比完全适用ASP脚本语言的执行速度要快很多，尤其是大运算量的时候跟为明显！
经过我们的具体测试，在操纵10000条数据库记录的时候，封装成为ActiveX DLL的WEB应用程序比纯ASP代码的应用程序，速度上面要快大约21%左右，在目前国内过于缓慢的网络来讲，速度就是一个WEB站点的很关键的一部分。并且采用了ActiveX DLL来开发WEB程序，要比单纯使用ASP好得多，毕竟ASP只能使用VBScript来开发，无法享用VB大量的优点，而ActiveX DLL则可以充分利用VB里面所有的特性。
下面我们先来看看什么是ActiveX DLL吧。ActiveX是微软提出的广泛应用于Windows系列的一种代码封装技术，提高了程序代码的可重用性，加快了程序项目的开发速度，一般被称为“组件”。在VB6的集成开发环境当中，我们可以看到一下几种ActiveX项目：
1、ActiveX EXE
这是在“过程外”运行的ActiveX/COM服务器组件，也就是说他们运行的过程和初始化组件的客户机代码不同。尽管可以用ASP访问ActiveX EXE，但是不推荐改动IIS元库，该库允许所有的可执行文件由服务器上运行的脚本代码启动。
2、ActiveX OCXs
这些特殊的组件把主机应用程序显示和操作组件所需的附加支持包含在GUI环境中。还可以把OCX组件放在网页当中
相关文档：
通过调用CreateDataSetfromXml取得XML数据
Imports System.Xml
Public Const FILE_CONFIG = "MZZ.xml"
Public Const PATH_CONFIG = "\XML\"
Dim dstXML As DataSet
Dim tblXML_DB As DataTable
Dim dtCod As New DataTable
Dim strSQL As String = ""
clsPublic ......
出现这个原因是internet用户访问的权限不够，系统默认权限是只读的，所以我们要给它分配可修改权限，废话不多说，进入主题：
1.资源管理器——>工具——>文件夹选项——>查看
2.将"简单文件共享(推荐)"选项去掉
3.选择你的WEB文件夹，看其属性，这时你会发现多了个"安全"选项卡� ......
C#生成com组件，供asp调用
一、vs2005—新建项目—C#类库
类库源码如下(包含接口，类，事件接口)：
using System;
using System.Collections.Generic;
using System.Text;
using System.IO;
using System.Data.SqlClient;
using System.Runtime.InteropServices;
namespace entryclass
{
......
转自：http://www.52arm.com/Article_Show.asp?ArticleID=186
作者：weidian ---本站原创 点击数：4721 发表时间：2008-5-7 编辑：sanzang
Winsock控件建立在TCP、UDP协议的基础上，完成与远程计算机的 ......
这段时间在移植项目的过程中，起初我想判断一个字符串中是否存在某字符（串），直接的使用方法是用instr（start，string1，string2，VB compare），但经过分析在VB中可以只用一下方法来判断！
1.常用的INStr方法
Function InStr([Start], [String1], [String2], [Compare A ......
