VBScriptかJavaScriptで入力文字を全角半角チェックするには？

[上に] [前に] [次に]
なななな・・ 1999/12/15(水) 09:16:00
件名の通りなんですが、VBScriptかJavaScriptのどちらかで、入力された文字を全角半角チェックするにはどうしたらいいのでしょうか。
それとも他の言語を使わないと駄目なんでしょうか。
どなたか教えて下さい。よろしくお願いします。
P初心者 1999/12/15(水) 10:08:01
以下が参考になると思います！

../199912/99120039.htm
ななな・・・・ 1999/12/15(水) 11:05:26
P初心者さん、ありがとうございます。
実は、やりたいのは全角カナと半角カナのチェックで、
VBScriptのLen関数とLenB関数の比較ではどうにも出来なかったのです。お教えいただいた方法も、試したところ同様でした。
言葉が足りなくて申し訳ありません。もう一度お願いします。
うぐいす 1999/12/15(水) 17:09:08
半角カナを全角カナに置き変える関数なら分かるんですけど・・・。＜VBScript
一応、書いておきます。

Set bobj = CreateObject("basp21")
str = bobj.HAN21ZEN("文字列")

# bobj、strは変数名です。適当に書き換えてください。
http://www.hi-ho.ne.jp/babaq/basp21.html
↑basp21のダウンロードや説明があります。
蓮子 [E-Mail] [HomePage] 1999/12/15(水) 17:46:33
これではどうでしょう。
文字数とバイト数を比較して違ったらボツ。

function GetLength(obj){   // 入力バイト数を返す
  var i,cnt = 0;
  for(i=0; i<obj.length; i++)
    if (escape(obj.charAt(i)).length >= 4 ) cnt+=2; else cnt++;
  return cnt;
}

function ZHcheck{
    od = document.myform.myinput.value ;
    if(GetLength(od) > od.length){
alert("半角で入力してね");
return false;
    }
}
蓮子 1999/12/15(水) 17:48:13
あれれ？一番前の空白認識するようになりました？？＞とほほさん
見づらい書き方してすいません＞みなさま
なななな・・・ 1999/12/16(木) 09:31:27
[[解決]]
うぐいすさん、蓮子さん、ありがとうございます。
チェックだけだったので、蓮子さんの方法でうまくいくことができました。
今後何かあったらまた質問させていただくと思うので、よろしくお願いします。
[上に] [前に] [次に]