■スレッドリストへ戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 最新50
read.cgi 2006―JavaScriptはCGIの夢を見るか
- 574 :動け動けウゴウゴ2ちゃんねる :2006/08/15(火) 01:50:41 ID:Vjx6htrB0
- http://winofsql.jp/VA003334/asp051115161559.htm#ttl3
vbsのはあった。
' バイナリ -> 内部コード
For i = 1 To LenB( strBin )
c1 = AscB(MidB(strBin, i, 1))
if &H81 <= c1 and c1 <= &H9f or &He0 <= c1 and c1 <= &Hfc then
i = i + 1
c2 = AscB(MidB(strBin, i, 1))
c1 = c1 * 16 * 16 + c2
end if
strVbs = strVbs & Chr(c1)
Next
処理自体はこのぐらい。
317KB
新着レスの表示
スレッドリストへ戻る 全部 前100 次100 最新50
0ch BBS 2004-10-30