• ベストアンサー

半角カナだけが入力できる<input type="text">は可能?

半角カナだけ入力できるテキストボックスは 作成可能でしょうか? Vbscript だけを使って実現したいと思います。

  • GBSGBS
  • お礼率36% (370/1012)

質問者が選んだベストアンサー

  • ベストアンサー
  • you111111
  • ベストアンサー率45% (20/44)
回答No.2

ちょっと面倒なやり方ですが、以下の様なものはいかがでしょう? テキストボックスのonblurイベント時にVBScriptでチェックしています。 ----サンプル----- <html> <head> <title>半角カナチェック</title> <script language="vbscript"> Function KanaCheck(strTarget) Dim obj, i, strChar, intAscBuff For Each obj in frm1 If InStr(obj.name, strTarget) > 0 then For i = 1 To Len(obj.value) strChar = Mid(obj.value, i, 1) intAscBuff = Asc(strChar) If intAscBuff < Asc("ア") Or intAscBuff > Asc("ン") Then If Not (intAscBuff = Asc("゛") Or _ intAscBuff = Asc("゜") Or _ intAscBuff = Asc(" ") Or _ intAscBuff = Asc("(") Or _ intAscBuff = Asc(")") Or _ intAscBuff = Asc("-") Or _ intAscBuff = Asc(",") Or _ intAscBuff = Asc(".") Or _ intAscBuff = Asc("\") Or _ intAscBuff = Asc("/") Or _ intAscBuff = Asc("「") Or _ intAscBuff = Asc("」")) Then If intAscBuff < Asc("A") Or _ intAscBuff > Asc("Z") Or _ intAscBuff < Asc("0") Or _ intAscBuff > Asc("9") Then KanaCheck = False msgbox obj.name & "は半角カナ文字のみの入力となります。" Exit Function End If End If End If Next End If Next KanaCheck = True End Function </script> </head> <body> <form name="frm1" method="post"> <input type="text" name="txt1" onblur="KanaCheck('txt1')"> <input type="text" name="txt2" onblur="KanaCheck('txt2')"> <input type="text" name="txt3" onblur="KanaCheck('txt3')"> </form> </body> </html>

GBSGBS
質問者

お礼

おぉ~~~、すごいです。 早速ためさせてもらいます。 ありがとうございました。

その他の回答 (2)

  • you111111
  • ベストアンサー率45% (20/44)
回答No.3

#2です。 補足です。 サンプルをそのまま使うとAsc("")の中身が全角になってしまうものが一部あるので半角に直してください。

GBSGBS
質問者

お礼

わざわざありがとうございます。 助かります。

  • utatane
  • ベストアンサー率33% (86/254)
回答No.1

スクリプト言語だけでは、入力チェックも難しいのでは・・・・ また、ASPを扱うのに”半角カナ”は普通使わないようにする物だと思っていますが^^;逆にどうなんでしょう?

GBSGBS
質問者

お礼

回答ありがとうございます。 半角カナってやっぱりWEB上では使わない ものなのでしょうか?・・。

関連するQ&A

  • 半角カナ入力について

    perlを使って入力項目を作っている人間です。 ある事に苦戦しています。 半角カナを入力すると文字化けが出てしまうので半角カナを入力しないように注意を促しているのですが、どうしても半角カナを入れてしまう人が入るので、半角カナを入力した時点で、注意事項をCGIで処理したいと思います。 しかし、CGIで処理する場合はどのようにすればいいのか解りません。 何かヒントなどを教えて頂けないでしょうか ? 又参考になるURLなどがありましたら教えて下さい。 お願します。

  • c♯テキストボックスの半角カナのみの入力

    こんばんは、現在Visual Studio2013でC♯用いてコードを書いています。 そこで困ったことがあるのですが、テキストボックスの入力文字制限で半角カナだけにしたく、コントロールのImeModeプロパティをKatakanaHalfにしたのですが、全角文字も入力出来てしまいます。 ImeModeプロパティのみの変更で半角カナだけの入力が可能だと思ったのですが、他にもプロパティ値を変更する必要はあるのでしょうか?

  • Access 文字入力について。

    環境はAccess2000です。 2つのテキストボックスを作成し、 一方のテキストボックスに文字(漢字やひらがな)を 入力すると、もう一方のテキストボックスに 入力した文字のカナ(半角カタカナ)を 表示させたいのですが、 Accessの機能等でそういったことは実現できるので しょうか?

  • 半角英数が入力できなくなってしまいました。半角カナしか打てません

    Windos2000の環境です。 何故か半角英数での入力が半角カナになってします。 ログイン画面でユーザ名を入力しようとすると半角英数が打てずに困っています。 とりあえず設定をチェックしてみると 入力モードは"直接入力"になってします。 変換モードは"一般(I)"になっています。 入力設定はかな入力になっています。特に変わった所は見当たらないのですが何故か半角カナになってしまいます。 その際、右下は「_A」と表示されています。 [半角/全角]キーを押すと「あ」となって問題なくひらがな入力はできます。 どうすれば半角英数を入力出来るようになるのでしょうか?

  • すぐに半角のかな入力になってしまい困ってます

    どういうわけか、気を抜くと半角のかな入力になってしまいます。 入力モードをどうすればいいんでしょうか。 理想としては常に全角のひらがな入力になっていて、必要に応じて半角の英数入力にしたいです。よろしくお願いいたします。

  • がな入力ができなくなった

    今、パソコン操作をやっていたら、とつぜんかな入力ができなくなり、何をやっても英数半角入力になってしまいました。 右下のツールボックスには、「あ般・・・」と表示されているのに、かな入力ができない状態です。 半角/全角の切り替えが無効です。 プロパティを調べましたが、特に変わったところはありませんでした。 再立ち上げをしたら直りましたが、今度そういう状態になったとき、どこを調べればよいでしょうか?

  • VBでローマ字入力とかな入力を使い分けたい時どうすれば??

    VisualBasic6.0を使って、 フォームの上にテキストボックスをふたつ 作ったプロジェクトを新規で作成します。 今、IMEの文字入力方式はローマ字方式を 使っているとします。今半角カナ入力状態に なっているとします。 その状態で、そのテキストボックスの上で Aを3回押すと半角カナでアアアとでます。 テキストボックス上で ALT + ひらがな を押して、かな入力に切り替えます。 そのテキストボックス上でAを3回押すと 半角英数字でaaaと出ます。 もうひとつのテキストボックスをクリックして そっちに移動してから、もとのテキストボックスに 移動します。 そこで、Aを3回押すと半角カナでチチチと出ます。 こういう手順を踏まないとひとつのテキストボックス上 でかな入力とローマ字入力を変えることができないですが 何か方法はないのでしょうか?それともこれは昔から どうしようもないことなのでしょうか? それは、この教えてGOOの質問のタイトルと 質問の内容のテキストボックスでも同じ事が 言えると思います。 普段はローマ字入力で、ある半角カナで入力したい テキストボックスにきた時だけ、何かをして かな入力に変更したいのですが、どうすればよいでしょう? 今、フォームを全画面表示していて IMEツールバーはタスクバーにしまったままにしてお きたいので、IMEツールバー上から変更するという 方法は使えないです。 どなたか親切な方回答お願いしますっ・・・。 また、ちなみにプログラム上から変えることって できるのでしょうか?やるつもりはないですが 一応聞いてみたいです。

  • ネット入力で半角カナ入力ができない

    初歩的な質問かもしれませんが、よろしくお願いします。 普通日本語入力で半角カナ入力する場合、文字を打った後F8変換で半角カナ入力しますよね。 ところが、インターネットの入力画面のところでそのF8キーがきかないのです。例えば検索ワード入力時やこの質問文を書いてる時もなりません。 まあ通常ネット上では半角カナは使用しないことは知っていたので、自動で制御がかかるもんだと思っており気にしなかったのですが、最近新生銀行を契約した時に振込先など半角カナで入力しなければならず、いちいちカナ入力にして四苦八苦しながらやっていました。 それでみんな苦労しながらやっているんだろうかと思い、友人の新生銀行ユーザーに聞いたところ普通にF8変換でやっていたのです。 なぜ、できる場合とできない場合があるのでしょう?どこか設定するところがあるのでしょうか? よろしくお願いします。

  • ことえりで半角カナ入力

    ことえりで半角カナを入力したいのですが、 どうやったら入力できるのでしょうか? OSは10.4.3です。

    • ベストアンサー
    • Mac
  • 初期入力モードを半角カタカナにする方法は?

    おはようございます。質問です! テキストボックスの初期入力モードを半角カタカナで、その後変更可に するということをJavaScriptでできますか? もし、できないのであれば、VBScriptなどで処理するロジックを作成し、execScript()で呼び出すということは可能でしょうか? ご存知の方がおりましたら、よろしくお願い致します!

専門家に質問してみよう