出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[554] VBScriptからVavaScriptへ
投稿者：sakuさん 2001/09/03 13:52:01
ボタンクリック後、セッションが切れていないか確認をして、切れていなければ新しいウィンドウを開く、切れていればメッセージを表示し、初期画面に戻る、という手順を考えています。
が、新規ウィンドウオープンがJavaScriptしか分からないため、
セッション確認部分（VBScript）と連動できなくて困っています。
新規ウィンドウオープンをVBScriptで行う方法、
もしくはJavaScriptからVBScriptへ処理を流す方法を教えてください。
なお、現状のソースのまま実行すると、
「（最終行に）Endがありません」というエラーメッセージが出ます。


///ボタンクリック
<P align=center><INPUT id=button1 name=button1 type=button value=ダウンロードファイル作成 onClick= ConCheck() Width= 500 height=100></P>

///JavaScriptでウィンドウオープン
<SCRIPT language=JavaScript>

function newWindow(){
var urlname,winname,winparms;

// URL を指定
urlname = "./Sales_CSV.asp";
// Window の名前を指定する
winname = "_popup";
// サイズなどのモードを指定する
winparms = "scrollbars=0,resizable=0,width=520,height=250";
window.open(urlname,winname,winparms);
}

window.onerror=null

</SCRIPT>

///VBScriptでセッションを持っているかチェック
function ConCheck()
　　If Session("CD1") = "" or Session("CD2") = "" or _
　　　　Session("CD3") = "" or Session("CD4") = "" Then
　　　　Err_Msg = "コードが設定されていません。選択メニューより、コードを選択して下さい。"
　　　　Err_Html_Wrt(Err_Msg)
　　Else
　　　　newWindow()　　　　'←このままでは、JavaScriptに飛びません。
　　End If
End Function

VBScriptからVavaScriptへ 　 sakuさん [2001/09/03 13:52:01] [554]
　 Re:VBScriptからVavaScriptへ 　 sakuさん [2001/09/03 15:22:33] [555]
　 　 Re:VBScriptからVavaScriptへ 　 sakuさん [2001/09/03 16:08:26] [556]
　 　 　 Re:VBScriptからVavaScriptへ 　 YasNet（管理人）さん [2001/09/03 16:20:01] [558]
　 　 　 　 Re:VBScriptからVavaScriptへ 　 sakuさん [2001/09/03 17:44:19] [561]
　 　 Re:VBScriptからJavaScriptへ 　 YasNet（管理人）さん [2001/09/03 16:15:33] [557]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ