...
<%
' 如果是訪客就要填寫購買人姓名及身份證號碼
If Not oMember.IsLogin Then
%>
<p>
<label for="shopper_name" class="text">購買人姓名</label>
<input type="text" name="shopper_name" id="shopper_name"
value="<% = oMemberData("Name") %>" />
</p>
<p>
<label for="shopper_pid" class="text">身份證號碼</label>
<input type="text" name="shopper_pid" id="shopper_pid"
value="<% = oMemberData("PersonalNumer") %>" />
</p>
<%
' 如果是會員就不用填寫了
Else
%>
<p>
<label for="shopper_name" class="text">購買人姓名</label>
<span><% = oMemberData("Name") %></span>
<input type="hidden" name="shopper_name" id="shopper_name"
value="<% = oMemberData("Name") %>" />
</p>
<p>
<label for="shopper_pid" class="text">身份證號碼</label>
<span><% = oMemberData("PersonalNumer") %></span>
<input type="hidden" name="shopper_pid" id="shopper_pid"
value="<% = oMemberData("PersonalNumer") %>" />
</p>
<%
End If
%>
...
<label for="receiver_name" class="text">收件人姓名</label>
<input type="text" name="receiver_name" id="receiver_name"
value="<% = oMemberData("Name") %>" />
...
<label for="receiver_address" class="text">收件人地址</label>
<input type="text" name="receiver_address" id="receiver_address" />
...
<fieldset><legend>選項 (非必填) </legend>
<%
' 在表單中加上一個 checkbox 
' 讓使用者決定要不要用現在的資料成為會員
If Not oMember.IsLogin Then
%>
<input type="checkbox" name="change_level" id="change_level" />
<label for="change_level">是否成為會員？</label>
<%
' 在表單中加上一個 checkbox 
' 讓一般會員決定要不要升級為 VIP 會員
ElseIf LEVEL_MEMBER = oMember.GetField("Level") Then
%>
<input type="checkbox" name="change_level" id="change_level" />
<label for="change_level">是否升級為 VIP 會員？</label>
<%
' 在表單中加上一個文字欄位
' 讓 VIP 會員使用點數
ElseIf oMember.GetField("Level") = LEVEL_VIP Then
%>
<p>您可用的 ECoupon 點數：100</p>
<label for="ecoupon_number">輸入欲使用的 ECoupon 點數：</label>
<input type="text" name="ecoupon_number" id="ecoupon_number" size="10" />
<%
End If
%>
</fieldset>
<input type="submit" value="確定" />
...