易截截图软件、单文件、免安装、纯绿色、仅160KB

用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 =&


相关文档:

Oracle的Window服务启动时并不启动实例

在window服务启动时并不启动实例的两种方法:
  (1)通过oradim startup 参数设定,如下:
  a.查看oradim帮助
C:Documents and SettingsAdministrator>oradim help
DIM-00002: 有效的命令包括: -DELETE, -EDIT, -NEW, -STARTUP 和 -SHUTDOWN
  请输入以下命令之一:
  通过指定以下参数创建例程:
-NEW - ......

Oracle 中的Union、Union All、Intersect、Minus

众所周知的几个结果集集合操作命令,今天详细地测试了一下,发现一些问题,记录备考。 假设我们有一个表Student,包括以下字段与数据: drop table student;
create table student
(
id int primary key,
name nvarchar2(50) not null,
score number not null
);
insert into student values(1,'Aaron',78);
inse ......

orale tablespace&datafile oracle表空间

在前面学习Oracle数据库基础架构时,已经了解了Oracle的存储结构,逻辑上,Oracle的数据存放在tablespaces中,物理上存放在datafiles中。一个tablespace只能属于一个数据库(一个数据库可包括多个tablespace),包括了1个或多个数据文件。Tablespace可进一步分为segments、extents和blocks。一个datafile只属于一个数据库的一 ......

oracle数据同步

oracle数据库同步
在两台oracle数据库之间测试成功,下面就总结一下吧:
需求:
现有两台oracle数据库服务器A和B(A,B可以是在同一内网,也可以是在互联网上的两台独立机器)。A和B里有都有testable表,结构一样,现需要当A库中的testable表变化时,B库里的testable也相应变化数据
我的解决方案:
在A中建立到B库的 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号