FC2ブログ

まったり開発日誌

embossの工具箱(J2EE Java2 Linux Zaurus C++)

ASPの開発中にSQL_TRACEをONにする工夫

こんなページを作っておくとデバッグ時に有効。

<%
Dim CMD
Dim adoCmd 'ADOオブジェクト
Dim commandText
Dim strMessageONOFF
CMD = Request("CMD")
Call main
Sub main()
'on error resume next
If fncChkSession(1,"") <> 0 Then
'不正の場合は終了
Exit Sub
End If
IF CMD="ON" THEN
commandText = "alter session set sql_trace=true"

strMessageONOFF =commandText & "を実行しました<BR>目的のページを実行後、必ずこのページに戻りOFFにして下さい<BR>OFFにしない場合、サーバーに負荷がかかり続けます<BR>"
ELSEIF CMD="OFF" THEN
commandText = "alter session set sql_trace=false"

strMessageONOFF =commandText & "を実行しました<BR><A href=""\\localhost\c$\oracle\admin\ORCL\udump"">トレースファイル</A>を確認してください。<BR>"
ELSE
strMessageONOFF=""
END IF

IF strMessageONOFF <> "" THEN

Session(pcSconDBConn).Execute commandText




END IF
if err.number<>0 then
response.write("err!")
end if
End Sub

%>

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html lang="ja"><head><meta content="text/html; charset=Shift_JIS" http-equiv="content-type"><title></title></head><body>

<div style="position: absolute; width: 449px; height: 122px; top: 50px; left: 34px;">

<%=strMessageONOFF %>
<form method="get" action="sqltrace.asp" name="FORM">
<div style="text-align: center;"><input name="CMD" value="ON" type="radio">ONにする <input name="CMD" value="OFF" type="radio">OFFにする<br>

<br>
<br>
</div>
<div style="text-align: center;"><input type="submit"></div>
</form>

</div>
</body></html>
スポンサーサイト
  1. 2005/10/07(金) 18:20:09|
  2. 開発メモ-データベース
  3. | トラックバック:0
  4. | コメント:0
<<対話型ユーザー アカウントで実行するように Office アプリケーションを構成する方法 | ホーム | SchTasks>>

コメント

コメントの投稿


管理者にだけ表示を許可する

トラックバック

トラックバックURLはこちら
http://emboss.blog28.fc2.com/tb.php/15-e260d22a
この記事にトラックバックする(FC2ブログユーザー)

RSSフィード

カレンダー

07 | 2019/08 | 09
- - - - 1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 31

カテゴリー

最近の記事

最近のコメント

最近のトラックバック

月別アーカイブ

ブロとも申請フォーム

この人とブロともになる

ブログ内検索

リンク

このブログをリンクに追加する

メールフォーム

名前:
メール:
件名:
本文: