VB6.0 url encode

帮一客户修改VB6程序，需要对一个http url进行编码操作，也就是url encode。经过一番研究，决定用插件实现。

1. 安装插件Chilkat

Chilkat Full-Version Software Components Downloads (chilkatsoft.com)

选择 Chilkat ActiveX Components

win32和x64的版本，实测我的Win10 x64系统用win32版本是有效的。

2. 添加引用

工程 > 引用，勾选 Chilkat ActiveX v9.5.0, 确定

3. 代码

Public Function URLEncodeNew(ByVal strContent As String) As StringDim strObj As New CkStringstrObj.str = strContentDim str As Stringstr = strObj.GetEncoded("url", "utf-8") 'utf-8str = Replace(str, ",", "%2C") '处理逗号URLEncodeNew = strEnd Function

注意，要设置Charset为utf-8,不然遇到中文会有问题。

另外，实测这段逻辑会漏掉英文逗号的处理，因此在代码中用Replace函数进行替换处理，如果发现有其他字符漏掉，也可以用此办法处理。

实测有效，问题解决。

VB6.0 url encode相关推荐

用RtlAdjustPrivilege来调整进程权限(VB6.0代码)
论坛上有朋友说起RtlAdjustPrivilege这个函数,就查了一下,写了个声明与调用示例出来,方便下次调用. 程序代码 Option Explicit Private Declare Funct ...
如何在VB6.0里动态使用具有事件的对象
代码如下: 'DLL内cTest内代码 Option Explicit '动态使用具有事件的对象 ' 'BY 嗷嗷叫的老马 'http://www.m5home.com Public Event KK ...
在VB6.0中怎么实现escape和unescape
两套方案,一是调用JAVAscript对象,二是自己写代码编码与解码,代码在CSDN中的以下帖子里贴出: 方案一代码: 复制内容到剪贴板程序代码 Function Escape(ByVal pstr ...
VB6.0 google 地图显示GPS数据
硬件是由艾琳科技提供的UM220测试板,软件是参考艾琳科技提供是工程文件编写的.硬件我就不介绍了,介绍下软件. 软件是用VB6.0 编写的,用到了其中的WEBBROWERS和MSCOMM控件.工作原理 ...
Asp.Net MVC2.0 Url 路由入门---实例篇
本篇主要讲述Routing组件的作用,以及举几个实例来学习Asp.Net MVC2.0 Url路由技术. 接着上一篇开始讲,我们在Global.asax中注册一条路由后,我们的请求是怎么转到相应的Vi ...
vb6.0 mysql ado控件_VB6.0里的ADO控件怎么用？
1,首先开启VB6.0时新建数据工程 2,双击窗体在弹出的窗体中追加控件:Command1,Text1,Adodc1,DataGrid1其中DataGrid1是用来显示查询结果,Adodc1用来导航查 ...
让你的VB6.0支持滚轮操作
因为工作的原因,最近装上了VB6.0,突然发现VB6.0不支持滚轮操作,郁闷至极,忍受了一个上午,渡过了一上午没有滚轮的日子...... 中午去微软官方网站查了查相关信息,终于搞定了 1.下载 htt ...
VB6.0 怎样启用控件comdlg32.ocx
VB6.0 怎样启用控件comdlg32.ocx 怎样启用控件comdlg32.ocx 2008-10-08 09:32 提问者: nefu_20061617 |浏览次数:1502次 vbs文件中有代 ...
VB6.0连接MySQL数据库
VB6.0连接MySQL数据库转载于:https://www.cnblogs.com/OneFri/p/5006026.html

VB6.0 url encode

1. 安装插件Chilkat

3. 代码

VB6.0 url encode相关推荐

最新文章

热门文章