推奨: Asp は 13 桁のランダムな文字列を生成しますhtml title /title body % Functiongen_key(digits) '配列の定義と初期化 dimchar_array(80) '数値の初期化 Fori=0To9 char_array(i)=CStr(i) Next '大文字の初期化 Fori=10To35 char_array(i)= Chr(i +55) Next '小文字を初期化 Fori=36To61 char_array(i)=Chr
間隔文字列を使用してデータを保存すると、書き込むデータベース フィールドの数を減らすことができ、将来のデータの拡張も容易になります。たとえば、フォーラムでは、ユーザーの性格には、楽観的、大人っぽい、素朴、やんちゃ、優しい、思いやりがあるなどの複数の性格があります。それらに対応する値はそれぞれ 0、1、2、3、4 です。保存する場合はスペーサー文字を使用します。データをテキストフィールドに保存するための文字列。データの保存形式は 0|2|3|4| です。
間隔文字列を使用してさまざまなデータを分割する場合、Split 関数を使用して 0|2|3|4| と 0|2|3|4 を分割したときに生成される配列の最大添字値が異なることがよくあります。余分なスペース文字が右端に書かれることに注意してください。このようにして、出力時にもう 1 つのデータが走査されることになります。この状況を回避するには、文字列を検出する必要があります。
アイデア：
1. 右側にスペーサー文字列があるかどうかを確認します。存在する場合は、配列の最大添字値を 1 つ減らす必要があります。
2. 存在しない場合は、元の配列の最大の添字を直接返します。
コード：
DimTempStr、TempArr、TempItem
TempStr=最初の項目 1|2 番目の項目 1|3 番目の項目|
TempArr=Split(TempStr,|)
Response.WriteTempStr&<br/>
ForTempItem=0ToUBoundStrToArr(TempStr,UBound(TempArr),|)
Response.WriteTempArr(TempItem)&<br/>
次
「************************」
'関数:UBoundStrToArr
'機能: 配列に変換された元の文字列の添字の最大値を検出します
'パラメータ: cCheckStr (検出する文字列)
'cUBoundArr (配列の最大添字値を生成します)
'cSpaceStr (間隔文字列)
'戻り値: 配列の添字の最大値
「************************」
PublicFunctionUBoundStrToArr(ByValcCheckStr,ByValcUBoundArr,ByValcSpaceStr)
IfInstr(cCheckStr,cSpaceStr)=0Then
UBoundStrToArr=cUBoundArr
終了関数
EndIf
DimTempSpaceStr,UBoundValue
TempSpaceStr=Mid(cCheckStr,Len(cCheckStr)-Len(cSpaceStr)+1)' 文字列の右側のスペース文字を取得します
IfTempSpaceStr=cSpaceStrThen' 文字列の右端にスペース文字がある場合、添え字の値は -1 である必要があります
UBoundValue=cUBoundArr-1
それ以外
UBoundValue=cUBoundArr
EndIf
UBoundStrToArr=UBoundValue
エンドファンクション
共有: ASP+AJAX により、Google に似た検索プロンプトが作成されます主なファイルは次のとおりです。 Index.html は関数、テキスト ボックスを実装し、コンテンツを入力し、プロンプト search.asp クエリ関数を実装します。テキスト ボックスに入力されたコンテンツをデータベースでクエリできるようにし、それをクライアントに返します。 conn.asp 実装するデータベース接続関数 xmlhttp.jsAJAX のコア部分はデータベースに接続され、クライアント データをサーバーに転送し、その後サーバー データをサーバーに転送するために使用されます。