用perl查询oracle数据库中存在的lock
原文地址oracle lock
1用Perl TK模块 查询DB中的LOCK
use DBI;
use Tkx;
use DBD::Oracle qw(:ora_session_modes);
$mw = Tkx::widget->new(”.”);
$mw->g_wm_title(”Oracle Lock”);
$content = $mw->new_ttk__frame(-padding => “5 5 12 0″);
$content->g_grid(-column => 0, -row => 0, -sticky => “nwes”);
$mw->g_grid_columnconfigure(0, -weight => 1);
$mw->g_grid_rowconfigure(0, -weight => 1);
$e1= $content->new_tk__entry( -width => 27, -textvariable => \$uname);
$e1->g_grid(-column => 2, -row => 0,-sticky => “nwes”);
$lbl = $content->new_ttk__label(-text => “username:”);
$lbl->g_grid(-column => 1, -row => 0,-sticky => “nwes”);
$e2= $content->new_tk__entry( -width => 27, -textvariable => \$passwd);
$e2->g_grid(-column => 2, -row => 1,-sticky => “nwes”);
$lb2 = $content->new_ttk__label(-text => “password:”);
$lb2->g_grid(-column => 1, -row => 1,-sticky => “nwes”);
$e3= $content->new_tk__entry( -width => 27, -textvariable => \$dsn1);
$e3->g_grid(-column => 2, -row => 3,-sticky => “nwes”);
$lb3 = $content->new_ttk__label(-text => “dsn:”);
$lb3->g_grid(-column => 1, -row => 3,-sticky => “nwes”);
$ba1 = $content->new_tk__button(-text => “sure”, -command => sub {sure();});;
$ba1->g_grid(-column =>2, -row => 4,-sticky => “nwes”);;
$ba1->g_bind(”<1>”, sub {sure();});
# $ba1->g_bind(”", sub {sure();});
($lb = $content->new_tk__listbox(-height =>
15,-width=>100))->g_grid(-column => 1, -row => 5, -sticky
=> “nwes”);
($s = $content->new_ttk__scrollbar(-command => [$lb, "yview"],
-orient => “vertical”))->g_grid(-column =&
相关文档：
一、建立链接服务器
有人喜欢调用系统过程来建立，但我个人对系统过程没有特别的学习 ，所以用的是界面设置，当然有兴趣也可以研究一下的，因为可以把SQL执行导出来。
USE [master]
GO
EXEC master.dbo.sp_addlinkedserver @server = N'TEST2', @srvproduct=N'ORCL', @provider=N ......
一、设置初始化参数 job_queue_processes
sql> alter system set job_queue_processes=n;（n>0）
job_queue_processes最大值为1000
查看该值 show parameter processes
查看job queue 后台进程
sql>select name,description from v$bgprocess;
二，dbms_job package 用法介 ......
crsctl stop crs
killall init.crsd
cd /etc/init.d
rm -rf init.crs init.crsd init.cssd init.evmd
rm -rf /tmp/.oracle/
rm -rf /var/tmp/
rm -rf /var/tmp/.oracle/
cd /etc
rm -rf oraInst.loc oracle/ oratab
rm -rf $ORACLE_BASE
dd if=/dev/zero of=/dev/raw/raw_voting_disks bs=1024k
dd if=/dev/zero ......
<!--
@Name：分类统计明细
@Time：2010.01.05
@author JZP
--->
<%@ page language="java" import="java.util.*" pageEncoding="GBK"%>
<%@ page language="java" import="wfc.service.database.DB"%>
<%@ page import="java.sql.Connection"%>
<%@ page import="java.sql.Resul ......
Oracle应用系统的优化四个方面
1. 应用程序SQL语句优化;
2. ORACLE数据库参数调整;
3. 操作系统参数调整;
4. 网络性能调整.
oracle应用系统的性能指标
1. 数据库吞吐量;
2. 数据库用户响应时间.
ORACLE数据库性能优化的几个部分
数据库性能优化包括如下几个部分：
1、1、调� ......
