Skip to content

cRedisClient - Redis 客户端

简介

cRedisClient 是一个简单易用的 Redis 数据库客户端,采用 VB6/VBA 编写。它支持 Redis RESP 协议,提供了常用的 Redis 命令接口,包括连接管理、基础操作、数据结构操作和事务等功能。

特性

  • 支持基础 Redis 命令 (GET, SET, DEL, EXISTS, KEYS 等)
  • 支持多种数据结构:String、Hash、List、Set、Sorted Set
  • 支持管道模式
  • 支持事务模式
  • 自动重连机制
  • 支持 Redis 密码认证
  • 支持多数据库切换
  • 同步操作,简单易用

文档目录

属性说明

属性类型说明
HostString获取 Redis 服务器地址
PortLong获取 Redis 服务器端口
ConnectedBoolean获取是否已连接
DbIndexLong获取或设置当前数据库索引 (0-15)
TimeoutDouble获取或设置超时时间(秒)
InTransactionBoolean获取是否在事务中
InPipelineBoolean获取是否在管道模式
LastErrorString获取最后一次错误信息
SocketcWinsock获取底层的 Socket 对象

注意事项

  1. 连接管理:使用完毕后记得调用 DisConnect 方法释放连接
  2. 错误处理:建议在操作前后检查连接状态和 LastError 属性
  3. 超时设置:根据网络环境合理设置 Timeout 属性
  4. 数据类型:Redis 中的所有值都以字符串形式存储,数值操作需要转换
  5. 事务安全:事务中的命令不会立即执行,直到调用 ExecDiscard
  6. 批量操作:使用 MGetMSet 等批量操作可以提高性能
  7. 资源释放:在对象不再使用时,将其设为 Nothing 释放资源

依赖项

  • cWinsock - Socket 通信组件
  • ToolsUtf8 - UTF-8 编解码工具
  • Scripting.Dictionary - 用于 HGetAll 返回字典对象

快速开始

vb
Dim oRedis As New cRedisClient

' 连接到本地 Redis 服务器
If oRedis.Connect() Then
    Debug.Print "连接成功!"

    ' 设置键值
    oRedis.Set_ "name", "张三"

    ' 获取值
    Debug.Print "姓名: " & oRedis.Get_("name")

    ' 断开连接
    oRedis.DisConnect
Else
    Debug.Print "连接失败: " & oRedis.LastError
End If

许可证

请参考项目主文档了解许可证信息。

VB6及其LOGO版权为微软公司所有