二进制连接函数VBSCRIPT

原创 2004年10月12日 09:08:00

Public Function ConvertAsc(strIn)
 Dim i
 ConvertAsc = ""
 For i=1 to Len(strIn)
  Dim c: c = Asc(Mid(strIn, i, 1))
  If Abs(c)<128 Then
   ConvertAsc = ConvertAsc & ChrB(c)
  Else
   Dim h: h = Hex(c)
   ConvertAsc = ConvertAsc & ChrB(Int("&H" & Mid(h, 1, 2)))
   ConvertAsc = ConvertAsc & ChrB(Int("&H" & Mid(h, 3, 2)))
  End If
 Next
End Function

Dim a: a = ConvertAsc("hello world!")
Dim b: b = ConvertAsc("世界你好!")

Response.BinaryWrite a + b

二进制连接函数VBSCRIPT

Public Function ConvertAsc(strIn) Dim i ConvertAsc = "" For i=1 to Len(strIn)  Dim c: c = Asc(Mid(st...
  • feng_sundy
  • feng_sundy
  • 2004年10月11日 20:14
  • 1001

vbscript脚本用二进制方式读写文件

  在项目中遇到这样的问题,程序中需要将用 Adodb.Stream生成的utf-8格式的csv文件导入mysql数据库中,当使用load data infile命令导入数据库以后,导入的表中的第一行...
  • zmxj
  • zmxj
  • 2009年02月27日 21:20
  • 5120

VBscript 中的Split 函数

Split 函数返回基于 0 的一维数组,其中包含指定数目的子字符串。Split(expression[, delimiter[, count[, start]]])参数expression必选项。字...
  • moklee
  • moklee
  • 2006年12月12日 00:35
  • 3390

VBScript 访问SQL数据库

Untested, as I don't have SQL Server Dim cn, rs Dim fout Dim i Dim line Const Server  = "yourSe...
  • meizihan0623
  • meizihan0623
  • 2011年10月17日 23:56
  • 490

VBScript 中的 "+" 和 "&" 连接字符串的区别

(1) "+" 加法运算符。                          如果两个 String 的类型使用 "+", 那么则相加, 如果是两个都是Numberic,则相加           ...
  • erix1991
  • erix1991
  • 2013年12月20日 11:56
  • 878

VBScript和JavaScript连接数据库(ACCESS)

1.VBScript连接数据库  程序代码 Dim conn,rs,sqlstr Set conn = CreateObject("ADODB.Connection") conn....
  • a771948524
  • a771948524
  • 2013年05月08日 16:28
  • 1995

VBScript测试SQL Server 2005数据库连接

Dim conn Set conn = CreateObject("ADODB.Connection") conn.connectionString = "Provider = SQLOLEDB;...
  • tastelife
  • tastelife
  • 2012年03月17日 12:52
  • 1249

vbscript和javascript之间的函数的调用

server1=cstr(request.servervariables("http_referer"))server2=cstr(request.servervariables("server_na...
  • iuhxq
  • iuhxq
  • 2004年12月06日 09:09
  • 1931

ASP,VBScript子程序和函数

'子程序     '什么是子程序?     '子程序是将一段具有某种特定功能的语句区块单句撰写成一个独立的程序,给予特定的名称     'A     '第二种调用方法 call A     ...
  • okenan123
  • okenan123
  • 2013年04月01日 16:14
  • 385

VBScript字符串函数

 VBScript字符串函数VBScript 教程http://www.microsoft.com/china/vbscript/vbstutor/vbstutor.htm 1. Split(expr...
  • hustfrl
  • hustfrl
  • 2007年06月05日 17:11
  • 352
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:二进制连接函数VBSCRIPT
举报原因:
原因补充:

(最多只允许输入30个字)