%
'判斷是否按下了確定按鈕，如果按下了，則對比驗證碼是否輸入正確
If Request.QueryString("submit") > "" Then
      Dim checkCode
      checkCode = Trim(Request.QueryString("checkCode"))
      If checkCode = Session("psn") Then
             Response.Write("script>alert('驗證碼正確');/script>")
      Else
             Response.Write("script>alert('驗證碼錯誤');/script>")
      End If
End If
%>
form action="test.asp" method="get">
input type="text" name="checkCode" />
img src="code.asp" />
input type="submit" name="submit" value="確定">
/form>

img src="code.asp" />
%=session("psn")%>

img src="code.asp" />
%=session("psn")%>