随笔分类 - VB6.0

摘要：VB6.0 中碰到提示rs对象关闭，不允许操作, 吃一堑长一智如果碰到这个错误提示则请检查你执行的每一个语句中的数据类型,包括如果有存储过程的话,还要检查存储过程中每一个变量和数据表中字段的数据类型及长度是否一致,否则就会出现这个问题... 搞死我了... 阅读全文

posted @ 2013-11-28 01:36 Alfa 阅读(580) 评论(0) 推荐(0) 编辑

【VB技巧】VB静态调用与动态调用dll详解

摘要：摘自: http://lcx.cc/?i=489【【请注意】】：在以下语法格式中，请注意 [函数名] 的【大小写】!!!静态与动态比较：静态调用简单，动态调用麻烦；静态调用占用资源多，动态调用占用资源少；正所谓鱼和熊掌不可兼得。静态调用定义：就是常用的申明API，一个DLL库里有很多的函数可供调用，把要用的申明即可。比如：Public/Private Declare Function [函数名] Lib "DLL文件名" [Alias "别名"] (参数变量表) [As 返回值的数据类型] 示例：Private Declare Function 阅读全文

posted @ 2013-10-18 15:01 Alfa 阅读(27312) 评论(3) 推荐(0) 编辑

VB获取和更改文件属性

摘要：VB获取和更改文件属性摘自网络供自己备查！Private Declare Function SetFileAttributes Lib "kernel32" Alias "SetFileAttributesA" (ByVal lpFileName As String, ByVal dwFileAttributes As Long) As LongPrivate Declare Function GetFileAttributes Lib "kernel32" Alias "GetFileAttributesA" ( 阅读全文

posted @ 2012-11-22 15:05 Alfa 阅读(3350) 评论(0) 推荐(0) 编辑

【转】如何复制一个正在使用的文件?(VB6.0)

摘要：2012-02-16 21:02【转】如何复制一个正在使用的文件?(VB6.0)刚刚在群里与别人聊到,使用VB的FileCopy函数无法复制正在使用中的文件.他是想将数据库备份.网上有不少的办法,有使用API的,有使用FSO的等.我想,无法复制使用中的文件,可能是使用了读写模式打开源文件的原因吧.于是就试着写了以下函数:Public Function FileCopyEx(ByVal SouFileName As String, ByVal DestFileName As String) '复制文件,可以复制正在使用的文件. 'SouFileName - 源文件 'De 阅读全文

posted @ 2012-11-12 01:22 Alfa 阅读(3607) 评论(0) 推荐(0) 编辑

VB6.0 取得windows 临时目录 temp

摘要：PrivateSubForm_Load() DimSAsString,S1AsString S=Environ("temp") OpenS&"\AA.txt"ForOutputAs#1 Print#1,"呵呵" Close#1 OpenS&"\AA.txt"ForInputAs#1 Input#1,S1 Close#1 MsgBoxS1 EndSub 阅读全文

posted @ 2012-11-12 00:50 Alfa 阅读(814) 评论(0) 推荐(0) 编辑

C# VB6.0 Java C++ GUID 生成

摘要：编辑本段GUID概念 GUID：即Globally Unique Identifier（全球唯一标识符）也称作 UUID(Universally Unique IDentifier) 。 GUID是一个通过特定算法产生的二进制长度为128位的数字标识符，用于指示产品的唯一性。GUID 主要用于在拥有多个节点、多台计算机的网络或系统中，分配必须具有唯一性的标识符。在 Windows 平台上，GUID 广泛应用于微软的产品中，用于标识如注册表项、类及接口标识、数据库、系统目录等对象。编辑本段GUID格式 GUID 的格式为“xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxx... 阅读全文

posted @ 2012-11-12 00:48 Alfa 阅读(1500) 评论(0) 推荐(0) 编辑

vb6.0 取得文件扩展名

摘要：Function GetFileExt(Filename As String) Dim TMP1, TMP2 TMP1 = Split(Filename, ".") If UBound(TMP1) <> 0 Then TMP2 = Split(TMP1(UBound(TMP1)), "\") If UBound(TMP2) = 0 Then GetFileExt = TMP1(UBound(TMP1)) End If End If End Function 阅读全文

posted @ 2012-11-11 12:14 Alfa 阅读(1035) 评论(0) 推荐(0) 编辑

VB6.0 在代码中直接调用文件打开对话框，不使用windows控件

摘要：Dim fileDlg As Object ' 文件对话框 ' 变量初始化 Set fileDlg = CreateObject("MSComDlg.CommonDialog") ' 打开附件 fileDlg.DialogTitle = "选择附件文件" fileDlg.Filter = "Excel (*.xls;*.xlsx)|*.xls;*.xlsx|" & _ "Word (*.doc;*.docx)|*.doc;*.docx|" & _ ... 阅读全文

posted @ 2012-11-11 11:27 Alfa 阅读(9519) 评论(1) 推荐(0) 编辑

VB6.0操作SQL Server——增删改查

摘要：http://www.cnblogs.com/Miss-Lin/archive/2012/08/13/2635848.html一、数据录入通过VB向SQL Server数据库中录入数据，可以使用数据绑定控件录入数据与使用SQL语句录入1.利用数据绑定控件录入数据使用数据绑定控件录入数据可以运行较少的代码，实现向数据库中录入数据，数据绑定后，由于数据绑定控件已经与数据表相连接，所以只需通过ADO控件的AddNew方法添加一条新的空白记录，再通过Update方法保存当前的记录，即可完成向数据库中录入数据。例：向数据库中添加一条记录?123456789101112131415161718192021 阅读全文

posted @ 2012-11-07 10:42 Alfa 阅读(27930) 评论(0) 推荐(1) 编辑

VB中调用带参数存储过程的实现(数据库)

摘要：VB中调用带参数存储过程的实现(数据库)张永晓　---- VB做为快速应用开发（RAD）工具越来越得到开发人员的认可和接受。它对许多API（如ODBC API、SOCKET API等等）的封装使得编程变得简单起来。同时，它支持集成开发环境下的可视化、事件驱动、面向对象等编程特点。下面，我们谈谈在VB中调用存储过程的实现方法及其注意事项。 ---- 我们知道，VB的数据库编程有许多种方法，比如直接用ODBC API编程，这种方法灵活、高效，程序员可以实现对数据库复杂的控制；也可以用VB中的数据对象，如RDO（远程数据对象）、DAO（数据访问对象）、ADO（ActiveX 数据对象），这种方法实现阅读全文

posted @ 2012-11-07 10:35 Alfa 阅读(4505) 评论(0) 推荐(0) 编辑

VB数据库记录查询四法

摘要：VB数据库记录查询四法山东许振华在VB中进行数据库记录的查询操作，必需根据打开数据库的方式来确定。以VB3．0为例，数据集对象有Table、Dynaset、Snapshot三种，下面四种查询方法分别适用于以上面不同的对象方式打开的数据库。1．用SEEK方法查询。这种方法只使用于以Opentable方式打开的Table类型的数据表，而且在查询之前必须要以查询字段建立索引文件，由于已建立了索引文件，所以查询速度很快，这种方式的查询结果是将指针移到符合条件的第一个记录。例如：set tb＝db.opentable（"demo"）tb.index＝"nameindex 阅读全文

posted @ 2012-11-07 10:33 Alfa 阅读(1847) 评论(0) 推荐(0) 编辑

至高吴上(Alfa.wu)

公告

搜索

常用链接

我的标签

随笔分类

随笔档案

相册

阅读排行榜

评论排行榜

推荐排行榜

最新评论

随笔分类 - VB6.0