■スレッドリストへ戻る■ 全部 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