摘要：'-Api Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) A... 阅读全文

摘要：'====VB判断webbrowser网页加载完毕Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) If (pDisp Is WebBrowser1.Object) Then Msgbox ... 阅读全文

摘要：response.write("Ais:"&clng(&hA))执行后可以获得正确的结果而使用Cdec和Val 均提示类型不匹配.而在VB中这连个都是可用的.ASP中就不可行. 阅读全文

摘要：注意:这个代码不要在VB的IDE环境中执行.否则将删除VB6.EXEAPI:GetModuleFileName获取当前进程已加载模块的文件的完整路径，该模块必须由当前进程加载。如果想要获取另一个已加载模块的文件路径，可以使用GetModuleFileNameEx函数Private Declare Function GetModuleFileName Lib "kernel32" Alias "GetModuleFileNameA" (ByVal hModule As Long, ByVal lpFileName As String, ByVal nSiz 阅读全文

只有注册用户登录后才能阅读该文。

摘要：当然机器装有mysql数据库然后下载安装Mysql，odbc驱动需要添加ado'菜单"工程"->"引用" 找 Microsoft ActiveX Data Object.... 或者简单点找到ado控件 扔到窗口上 再删除 也行在vb中连接数据库的代码：Dim cn As New ADODB.ConnectionDim rs As New ADODB.Recordset' 定义数据库连接字符串变量Dim strCn As String' 定义数据库连接参数变量Dim db_host As StringDim db_user 阅读全文

摘要：VB ADODB中的RecordSet.Open打开记录的两个参数adOpenKeyset、adLockBatchOptimistic的详细说明：这两个参数当时弄明白，过后又忘记了，做了笔记，但为了方便，还是在Blog中也做上这个笔记。缺省值1 adLockReadOnly RecordSet对象以只读方式启动，无法运行增、删、改等操作 2 adLockPessimistic 当数据源正在更新时，系统会锁定其他用户的动作，以保数据一致性。 3 adLockOptimistic 当数据源正在更新时，系统不会锁定其他用户的动作，其他用户可以对数据进行增、删、改操作。 4 adLockBatchOp 阅读全文

摘要：编写一个加密软件，要求将源文件按字节逐位倒排序加密法加密。字节逐位倒排序加密法是以比特为单位的换位加密方法，用VB实现的具体算法是：(1) 以二进制模式打开源文件；(2) 从源文件第I位读取一个字节，假设为字母“A”，得到“A”的ASCII值为65；(3) 将65转换成八位二进制串为“01000001”；(4) 将“01000001”按字节逐位倒排序得另一个八位二进制串“10000010”；(5) 将“10000010”转换成十进制再写回源文件第I位置，完成一个字节的加密；(6) 重复(2)、(3)、(4)和(5)，直到所有字节加密结束。为了使程序模块化，我们用函数过程ByteToBin完成将 阅读全文

摘要：一、ASP的对象存取数据库方法在ASP中，用来存取数据库的对象统称ADO（Active Data Objects），主要含有三种对象：Connection、Recordset 、CommandConnection：负责打开或连接数据Recordset：负责存取数据表Command：负责对数据库执行行动查询命令二、连接各数据库的驱动程序连接各数据库可以使用驱动程序，也可以使用数据源，不过我建议大家使用驱动程序，因为使用驱动程序非常方便、简单，而使用数据源比较麻烦。ODBC链接适合数据库类型 链接方式 access "Driver={microsoft access driver(*.m 阅读全文