|
<%
' **********************************************************
' 外部ファイル
' **********************************************************
%><!-- #include virtual = "/asp/common.inc" --><%
%><!-- #include virtual = "/asp/dbMySQL.inc" --><%
%><!-- #include file = "model.inc" --><%
' **********************************************************
' 定数定義
' **********************************************************
Const PASS_MESSAGE = "1"
Const PASS_COND = "2"
Const PASS_LIST = "3"
' **********************************************************
' グローバル変数定義
' **********************************************************
Dim ErrMessage ' エラー処理用
Dim Message ' 通常メッセージ用
Dim InData ' フレーム間引継ぎ埋め込み用
Dim OptionList ' コンボボックス埋め込み用
Dim OutData ' 結果表示埋め込み用
Dim Cn,Rs ' データベース用
Call LoginCheck( "User" )
| |