フォーラムなど、オンラインでダウンロードしたプログラムは、インストール中にソフトウェアのようなものをインストールしています。
私たちが直面する主な問題は、次のとおりです。
1。インターフェイスは、Windowsウィザードとまったく同じです。
2。ユーザーはバックボタンを使用して前のステップに戻り、前のステップで選択されたコンテンツを変更できます
3。フォームは、入力されたすべての内容を覚えておく必要があります
4。データベースを使用できません
5。残念ながら、セシオンが失敗した後、ユーザーのすべての入力を防ぐためにセッションを使用できません
なぜなら、多くの場合、ブラウザをオフにすることが多いからです。
6。ポータビリティは、インストール手順が異なる場合の状況に適応するため、より優れています
解決:
1。非表示変数を使用してパラメーターを渡します
2。 POSTメソッドを使用して、この方法は長さごとに制限されるため、GETメソッドを使用しないでください
3。各ページには、提出された値を読み取るための関数が必要です
4。各ページ(最初のページを除く)には、パラメーターをフロントページに渡すために隠されたフォームが必要です
ページでチェックボックスまたはラジオボタンを使用する場合は、次のコード読み取り値を使用してください。
request.formの各アイテムの<%
if request.form(item).count then
intloop = 1がrequest.form(item).count
Response.write item =&item&index =&intloop&<br>
次
それ以外
Response.write item =&item&<br>
ifを終了します
次
%>
設計は、チェックボックスとラジオに特別な処理方法を使用することです。
1。これらの2つの方法では、最新の値のみが保存されていると見なされます
2。ユーザーは戻って以前に入力された値を変更することができますが、有効にするには次のように提出する必要があります
3。ページは、1つのページに複数のコントロールがある状況に対処できる必要があります
特定の実装方法:
nページには次のようなものがあります。
1。最初のフォーム:そのaction = page(n+1).aspとその底には次のボタンが必要です
2。 2番目のフォーム:そのaction = page(n-).aspおよびバックボタン
3。変数の命名ルール:例:n_ <ページ番号>サフィックスはコントロールタイプ= Radio name = radio_p2>です
それは2番目のページの名前がラジオであることを意味します
4。提出の読み取りに使用される関数
ページは、現在のコントロールのどのページがサイクルに基づいているかを決定します。
コードは次のとおりです。
<%@言語= vbscript%>
<html>
<head>
</head>
<body>
<! - 次のボタンモジュールプログラミングStarts->
<form action = page03.asp method = post>
<!------------------------------- -------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------- ---------- >>
<! - start->に関数を読みます
<!------------------------------- -------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------- ---------- >>
<%
pageno = _p2
request.formの各アイテムについて
whichpage = strust(1、cstr(item)、pageno、1)
ifst.form(item).count)および(whitepage = 0)then
strcount = request.form(item).count
stritem = request.form(item)(strcount)
respons.write <入力タイプ=非表示name =&item&value =&stritem&>&vbcrlf
elseif(not(request.form(it).count)と(whitepage = 0)then then
Response.Write <入力タイプ=非表示name =&item&value =&stritem&>&vbcrlf
ifを終了します
次
%>
<!------------------------------- -------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------- --------- >>
<1--関数の関数を読み取ります
<!------------------------------- -------------------------------------------------------------- ------------------------------------------------------------------------------------------------------------------- --------- >>
<! - #include file = check_uncheck.txt->
<%
function check_uncheck(ctrlname、ctrlvalue)
dim ctrlname_in
dim ctrlvalue_in
dim ctrlvalue_actual
Dim Outstr
ctrlvalue_in =
ctrlname_in =
ctrlvalue_actual =
outstr =
ctrlname_in = ctrlname_in&ctrlname
ctrlvalue_in = ctrlvalue_in&ctrlvalue
if request.form(ctrlname_in).count then
strcount = request.form(ctrlname_in).count
ctrlvalue_actual = request.form(ctrlname_in)(strcount)
ctrlvalue_actual = ctrlvalue_in thenの場合
outstr = checked
ifを終了します
それ以外
ctrlvalue_actual = request.form(ctrlname_in)
ctrlvalue_actual = ctrlvalue_in thenの場合
outstr = checked
ifを終了します
ifを終了します
check_unches = outstr
エンド関数
%>
<! - バックボタンモジュールの起動 - >
<%
stritem1 =
stritem1a =
request.formの各item1の場合
request.form(item1).countの場合
strcount1 = request.form(item1).count
stritem1 = requesest.form(item1)(strcount1)
Response.Write <入力タイプ=非表示name =&item1&value =&stritem1&>&vbcrlf
strcount1 =
stritem1 =
それ以外
stritem1a = request.form(item1)
respons.write <入力タイプ=非表示名=&item1&value =&stritem1a&>&vbcrlf
ifを終了します
次
stritem1 =
stritem1a =
%>