木子屋 Dnawo's BLOG

2009-09 归档

共 40 篇

VB6.0 获取指定文件夹下的文件[夹]

'说明:获取指定文件夹的子文件夹 '参数: ' path:字符串,指定的文件夹路径 ' searchOption:布尔值,True 所有子文件夹; False 当前文件夹的子文件夹 '返回值:数组 '注意:数组第1项(GetFolders(0))始终为空,应从第2项(GetFolders(1))开始计算 Public Function GetFolders(path As String, searchOption As Boolean) As String() ReDim result(0) As String Dim arr() As String Dim i, j …

淘宝网开放平台回调参数top_parameters说明

在调用接口获取SessionKey时,无论是B/S还是C/S,淘宝都会返回如下参数: top_appkey=xxx&top_parameters=xxxxx&top_session=xxxxx&top_sign=xxxxx top_appkey是应用的Key,top_session即是SessionKey,top_sign是签名,那top_parameters表示什么呢?按官方说明,它是插件容器传递给插件的参数集合,亦即上下文参数,由下表参数按key1=value1&key2=value2...组合,再使用Base64编码而成。

VB6.0 Dictionary排序

参考: ·排序的 String 类型的值的数据填充的脚本字

VB6.0 MSHFlexGrid控件添加数据三种方法

1.绑定到数据源 2.使用AddItem方法添加数据 3.逐一单元格添加数据 说明:添加部件"Microsoft Hierarchical FlexGrid Control 6.0 (OLEDB)"才能使用MSHFlexGrid。

淘宝网开放平台API(taobao.items.all.get)调用示例

using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Xml; using System.Net; using System.Web.Security; using System.IO; using System.Text.RegularExpressions;…

VB6.0读取XML示例

Option Explicit Private Sub Form_Load() '需引用 Microsoft XML, v6.0 Dim xmlDoc As DOMDocument Dim nodeList As IXMLDOMNodeList Dim node As IXMLDOMNode On Error Resume Next Set xmlDoc = New DOMDocument xmlDoc.loadXML ("<xml><website><domain>mzwu.…