![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
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>
No.3
- 回答日時:
#2です。
補足です。
サンプルをそのまま使うとAsc("")の中身が全角になってしまうものが一部あるので半角に直してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
- JavaScript Javascriptが機能せず原因が分からないので教えて頂きたいです 3 2023/06/04 14:50
- iOS これは日本語入力の大発明ですか? 7 2022/12/21 07:17
- JavaScript フォームが空欄の時にフォームの外をクリックすると、エラーが出るコードを調べています。 1 2023/06/25 11:51
- Visual Basic(VBA) Selenium Basicの件 5 2023/04/10 20:55
- PHP 入力した部分を表示させたまま(保持)するにはどうすれば良いでしょうか? 1 2023/01/25 11:14
- HTML・CSS HTML <input type=password>の黒丸の色を変える方法 3 2022/11/23 13:56
- JavaScript javascriptのちょっとした動作不良(原因は突き止めたのですが) 1 2023/06/15 19:58
- JavaScript sessionStorageを調べています。 1 2023/06/20 12:41
- HTML・CSS ただいま勉強始めたての初心者です。フォームを縦並べにしたいです。 2 2022/11/20 17:18
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
onedrive にexcelファイルをア...
-
スイッチが二台あり、別々のア...
-
キヤノン アソビカメラ iNSPiC ...
-
バッチで当日日付で作成される...
-
Windows10にデュアルブートでXP...
-
”KINGSOFT WPSのVBエディタ画面...
-
phpのファイルがブラウザで開か...
-
VB.NET Excelを読み込んでDataT...
-
discordについての質問です。久...
-
エクセルに張り付けた写真のフ...
-
Windowsで複数のファイルを同じ...
-
SPO2測定
-
高校1年生情報の問題について。
-
エクセルのマクロについて教え...
-
インドe-Visa 承認書のApplicat...
-
SPIの非言語の割合と比が難しく...
-
SPIの対策は参考書でやるべきか?
-
LEDで電光掲示板に「A B C D E...
-
One Driveへのアクセス
-
LINE APIからasp.net の web サ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
遷移先のURLにパラメータを表示...
-
テキストエリアで入力した文字...
-
<!DOCTYPE HTML PUBLIC "-//W3C...
-
<input>でonblur=がある場合の入力
-
[ASP]URL付加情報を転用した...
-
VBSでXMLを操作したい
-
あいまい検索画面を作成したい
-
入力フォームの値をSQLのクエリ...
-
半角カナだけが入力できる<inpu...
-
onBlur→検索→結果の表示
-
確認画面を出す
-
インラインフレーム内を送信する
-
テキストボックス内を・・・
-
form送信でテキストがバイナリ...
-
HTMLの値の渡し方について質問...
-
フォームのtextareaにnl2brを使...
-
ACCESSのレポートの表示...
-
aspxでIFみたいなことがしたい
-
write downとfill outの違いを...
-
機種依存文字
おすすめ情報