ORACLE 判斷TALBE 存不存在SQL COMMAND

DECLARE tbl_exist PLS_INTEGER;

BEGIN
select count(*) into tbl_exist from user_tables where table_name = 'mytable';
if tbl_exist = 1 then
execute immediate 'drop table mytable';
end if;

END;
參考來源

VB.NET App.Config 使用

app.config 設定如下









VB.NET 程式碼
Imports System.Configuration
Dim CNN as String = ConfigurationManager.ConnectionStrings("CNN").ConnectionString)
Dim ROOT As String = ConfigurationManager.AppSettings("ROOT_PATH").ToString

資料表的查詢

Oracle:
Select table_name from user_tables

PostgreSQL:
select * from pg_stat_user_tables WHERE schemaname='public'
select relname from pg_stat_user_tables WHERE schemaname='public'

【VB】利用 Array.Indexof() 於陣列的字串變數中 的搜尋 對應字串於陣列中的 Index 位置

當 定義一組 矩陣變數 為字串 時，
如何於字串變數中，找到對應的字串位於 矩陣變數中的 Index 值?
可以利用 Array.Indexof() 來搜尋

Array.IndexOf 方法 (Array, Object, Int32)

範例如下:
Dim AttStr() As String = { "aaa", "bbb", "ccc", "abc" }
Dim FindStr As String = ""
Dim FindIndex As Integer

FindStr = "aaa"
FindIndex = Array.IndexOf(FindStr, Str2)
FindIndex = Array.IndexOf(AttStr,FindStr)
' Console.WriteLine(FindIndex) 'Print Output: 0

FindStr = "a"
FindIndex = Array.IndexOf(FindStr, Str2)
FindIndex = Array.IndexOf(AttStr,FindStr)
' Console.WriteLine(FindIndex) 'Print Output: -1

FindStr = "ccc"
FindIndex = Array.IndexOf(FindStr, Str2)
FindIndex = Array.IndexOf(AttStr,FindStr)
' Console.WriteLine(FindIndex) 'Print Output: 2

參考:
MSDN
[入門文章] .NET 陣列詳論

报错:ORA-00054: 资源正忙，要求指定 NOWAIT

转载
标签：
oracle数据库
阻塞
结果集
进行
死锁
it
分类： ora错误分析

问题如下：

SQL> conn scott/tiger@vm_database
Connected to Oracle Database 11g Enterprise Edition Release 11.1.0.6.0
Connected as scott

。。。。。。

SQL> drop table student2;

drop table student2

ORA-00054: 资源正忙, 但指定以 NOWAIT 方式获取资源, 或者超时失效
=========================================================

解决方法如下：

=========================================================

SQL> select session_id from v$locked_object;

SESSION_ID
----------
142

SQL> SELECT sid, serial#, username, osuser FROM v$session where sid = 142;

SID SERIAL# USERNAME OSUSER
---------- ---------- ------------------------------ ------------------------------
142 38 SCOTT LILWEN

SQL> ALTER SYSTEM KILL SESSION '142,38';

System altered

SQL> conn scott/tiger@vm_database
Connected to Oracle Database 11g Enterprise Edition Release 11.1.0.6.0
Connected as scott

SQL> drop table student2;

Table dropped

Oracle数据库的锁类型

根据保护的对象不同，Oracle数据库锁可以分为以下几大类：DML锁（data locks，数据锁），用于保护数据的完整性；DDL锁（dictionary locks，字典锁），用于保护数据库对象的结构，如表、索引等的结构定义；内部锁和闩（internal locks and latches），保护数据库的内部结构。

DML锁的目的在于保证并发情况下的数据完整性，。在Oracle数据库中，DML锁主要包括TM锁和TX锁，其中TM锁称为表级锁，TX锁称为事务锁或行级锁。

当Oracle 执行DML语句时，系统自动在所要操作的表上申请TM类型的锁。当TM锁获得后，系统再自动申请TX类型的锁，并将实际锁定的数据行的锁标志位进行置位。这样在事务加锁前检查TX锁相容性时就不用再逐行检查锁标志，而只需检查TM锁模式的相容性即可，大大提高了系统的效率。TM锁包括了SS、SX、S、X 等多种模式，在数据库中用0－6来表示。不同的SQL操作产生不同类型的TM锁。

在数据行上只有X锁（排他锁）。在 Oracle数据库中，当一个事务首次发起一个DML语句时就获得一个TX锁，该锁保持到事务被提交或回滚。当两个或多个会话在表的同一条记录上执行 DML语句时，第一个会话在该条记录上加锁，其他的会话处于等待状态。当第一个会话提交后，TX锁被释放，其他会话才可以加锁。

当Oracle数据库发生TX锁等待时，如果不及时处理常常会引起Oracle数据库挂起，或导致死锁的发生，产生ORA-60的错误。这些现象都会对实际应用产生极大的危害，如长时间未响应，大量事务失败等。

悲观封锁和乐观封锁

一、悲观封锁
锁在用户修改之前就发挥作用：
Select ..for update（nowait)
Select * from tab1 for update
用户发出这条命令之后，oracle将会对返回集中的数据建立行级封锁，以防止其他用户的修改。
如果此时其他用户对上面返回结果集的数据进行dml或ddl操作都会返回一个错误信息或发生阻塞。
1：对返回结果集进行update或delete操作会发生阻塞。
2：对该表进行ddl操作将会报：Ora-00054:resource busy and acquire with nowait specified.

原因分析
此时Oracle已经对返回的结果集上加了排它的行级锁，所有其他对这些数据进行的修改或删除操作都必须等待这个锁的释放，产生的外在现象就是其他的操作将发生阻塞，这个这个操作commit或rollback.
同样这个查询的事务将会对该表加表级锁，不允许对该表的任何ddl操作，否则将会报出ora-00054错误：:resource busy and acquire with nowait specified.

二、乐观封锁
乐观的认为数据在select出来到update进取并提交的这段时间数据不会被更改。这里面有一种潜在的危险就是由于被选出的结果集并没有被锁定，是存在一种可能被其他用户更改的可能。因此Oracle仍然建议是用悲观封锁，因为这样会更安全。



阻塞

定义：
当一个会话保持另一个会话正在请求的资源上的锁定时，就会发生阻塞。被阻塞的会话将一直挂起，直到持有锁的会话放弃锁定的资源为止。4个常见的dml语句会产生阻塞
INSERT
UPDATE
DELETE
SELECT…FOR UPDATE


INSERT

Insert发生阻塞的唯一情况就是用户拥有一个建有主键约束的表。当2个的会话同时试图向表中插入相同的数据时，其中的一个会话将被阻塞，直到另外一个会话提交或会滚。一个会话提交时，另一个会话将收到主键重复的错误。回滚时，被阻塞的会话将继续执行。

UPDATE 和DELETE当执行Update和delete操作的数据行已经被另外的会话锁定时，将会发生阻塞，直到另一个会话提交或会滚。

Select …for update

当一个用户发出select..for update的错作准备对返回的结果集进行修改时，如果结果集已经被另一个会话锁定，就是发生阻塞。需要等另一个会话结束之后才可继续执行。可以通过发出 select… for update nowait的语句来避免发生阻塞，如果资源已经被另一个会话锁定，则会返回以下错误：Ora-00054:resource busy and acquire with nowait specified.




死锁-deadlock

定义:当两个用户希望持有对方的资源时就会发生死锁.
即两个用户互相等待对方释放资源时,oracle认定为产生了死锁,在这种情况下,将以牺牲一个用户作为代价,另一个用户继续执行,牺牲的用户的事务将回滚.
例子：
1：用户1对A表进行Update，没有提交。
2：用户2对B表进行Update，没有提交。
此时双反不存在资源共享的问题。
3：如果用户2此时对A表作update,则会发生阻塞，需要等到用户一的事物结束。
4：如果此时用户1又对B表作update，则产生死锁。此时Oracle会选择其中一个用户进行会滚，使另一个用户继续执行操作。
起因:
Oracle的死锁问题实际上很少见，如果发生，基本上都是不正确的程序设计造成的，经过调整后，基本上都会避免死锁的发生。

DML锁分类表




表1 Oracle的TM锁类型
锁模式 锁描述 解释 SQL操作
0 none
1 NULL 空 Select
2 SS(Row-S) 行级共享锁，其他对象只能查询这些数据行 Select for update、Lock for update、Lock row share

3 SX(Row-X) 行级排它锁，在提交前不允许做DML操作 Insert、Update、Delete、Lock row share

4 S(Share) 共享锁 Create index、Lock share
5 SSX(S/Row-X) 共享行级排它锁 Lock share row exclusive
6 X(Exclusive) 排它锁 Alter table、Drop able、Drop index、Truncate table 、Lock exclusive



1.关于V$lock表和相关视图的说明

Column Datatype Description
ADDR RAW(4 | 8) Address of lock state object
KADDR RAW(4 | 8) Address of lock
SID NUMBER Identifier for session holding or acquiring the lock
TYPE VARCHAR2(2) Type of user or system lock
The locks on the user types are obtained by user applications. Any process that is blocking others is likely to be holding one of these locks. The user type locks are:
TM - DML enqueue
TX - Transaction enqueue
UL - User supplied
--我们主要关注TX和TM两种类型的锁
--UL锁用户自己定义的，一般很少会定义，基本不用关注
--其它均为系统锁，会很快自动释放，不用关注
ID1 NUMBER Lock identifier #1 (depends on type)
ID2 NUMBER Lock identifier #2 (depends on type)
---当lock type 为TM时，id1为DML-locked object的object_id
---当lock type 为TX时，id1为usn+slot，而id2为seq。
--当lock type为其它时，不用关注
LMODE NUMBER Lock mode in which the session holds the lock:
0 - none
1 - null (NULL)
2 - row-S (SS)
3 - row-X (SX)
4 - share (S)
5 - S/Row-X (SSX)
6 - exclusive (X)
--大于0时表示当前会话以某种模式占有该锁，等于0时表示当前会话正在等待该锁资源，即表示该会话被阻塞。
--往往在发生TX锁时，伴随着TM锁，比如一个sid=9会话拥有一个TM锁，一般会拥有一个或几个TX锁，但他们的id1和id2是不同的，请注意
REQUEST NUMBER Lock mode in which the process requests the lock:
0 - none
1 - null (NULL)
2 - row-S (SS)
3 - row-X (SX)
4 - share (S)
5 - S/Row-X (SSX)
6 - exclusive (X)
--大于0时，表示当前会话被阻塞，其它会话占有改锁的模式
CTIME NUMBER Time since current mode was granted
BLOCK NUMBER The lock is blocking another lock
0, 'Not Blocking',
1, 'Blocking',
2, 'Global',

--该锁是否阻塞了另外一个锁



2.其它相关视图说明
视图名 描述 主要字段说明
v$session 查询会话的信息和锁的信息。 sid,serial#：表示会话信息。
program：表示会话的应用程序信息。
row_wait_obj#：表示等待的对象,和dba_objects中的object_id相对应。
lockwait :该会话等待的锁的地址,与v$lock的kaddr对应.
v$session_wait 查询等待的会话信息。 sid：表示持有锁的会话信息。
Seconds_in_wait：表示等待持续的时间信息
Event：表示会话等待的事件，锁等于enqueue

dba_locks 对v$lock的格式化视图。 Session_id：和v$lock中的Sid对应。
Lock_type：和v$lock中的type对应。
Lock_ID1： 和v$lock中的ID1对应。
Mode_held,mode_requested：和v$lock中
的lmode,request相对应。
v$locked_object 只包含DML的锁信息，包括回滚段和会话信息。 Xidusn,xidslot,xidsqn：表示回滚段信息。和
v$transaction相关联。
Object_id：表示被锁对象标识。
Session_id：表示持有锁的会话信息。
Locked_mode：表示会话等待的锁模式的信
息，和v$lock中的lmode一致。




1.查询数据库中的锁

select * from v$lock;
select * from v$lock where block=1;

2.查询被锁的对象

select * from v$locked_object;

3.查询阻塞

查被阻塞的会话
select * from v$lock where lmode=0 and type in ('TM','TX');

查阻塞别的会话锁
select * from v$lock where lmode>0 and type in ('TM','TX');

4.查询数据库正在等待锁的进程

select * from v$session where lockwait is not null;

5.查询会话之间锁等待的关系

select a.sid holdsid,b.sid waitsid,a.type,a.id1,a.id2,a.ctime from v$lock a,v$lock b
where a.id1=b.id1 and a.id2=b.id2 and a.block=1 and b.block=0;

6.查询锁等待事件
select * from v$session_wait where event='enqueue';

解决方案：
select session_id from v$locked_object; --首先得到被锁对象的session_id
SELECT sid, serial#, username, osuser FROM v$session where sid = session_id; --通过上面得到的session_id去取得v$session的sid和serial#，然后对该进程进行终止。
ALTER SYSTEM KILL SESSION 'sid,serial';
example:
ALTER SYSTEM KILL SESSION '13, 8';


本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/owen_008/archive/2009/09/05/4522158.aspx
參考來源:http://blog.sina.com.cn/s/blog_54eeb5d90100ntgc.html

List、Array 轉String

宣告一個 List 變數 ArrList
Dim ArrList As New List(Of String)


用 ArrList.Add() 函數可把資料加入 List 中
ArrList.Add("a")
ArrList.Add("b")

'轉陣列

1. 將 ArrList 轉成 String() 陣列

Dim ArrString As String() 

ArrString = ArrList.ToArray

2. 將 ArrList 轉成 String 陣列

Dim ArrString() As String 

ArrString = ArrList.ToArray

'將 List 轉成 String 分隔符號用逗點分隔

'String.Join(",", ArrList.ToArray)

轉成 String ，內容為 "a,b"

方法1. 直接將 ArrList 轉成字串

Dim sstr As String = String.Join(",", ArrList.ToArray)

方法2 將 arrstring 陣列轉成字串

Dim sstr As String = String.Join(",", arrstring)

使用函數

ToArray()

 String.Join()

使用宣告變數

List(of String)

String()

String

【ASP.NET】利用 Sqldatasource 抓出 Gridview 的 SelectedDataKey

當 Gridview 設定了多個 DataKey 時
Sqldatasource 要如何取得 Selected DataKeys 中的某一個 DataKey
主要是用 ControlParameter 然後定義 PropertyName 為 SelectedDataKey 加上維度即可做到

<asp:ControlParameter ControlID="GridView1" Name="ServiceID" PropertyName="SelectedDataKey[0]" />




---------------------------------------------------------------------------------------------------------------------------
<asp:SqlDataSource ID="SqlDataSource2" runat="server" ConnectionString="<%$ ConnectionStrings:ConnectionString %>" ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>" 
SelectCommand="SELECT A,B,C FROM Table WHERE A = @A And B=@B">
<SelectParameters>
<asp:ControlParameter ControlID="GridView1" Name="A" PropertyName="SelectedDataKey[0]" />
<asp:ControlParameter ControlID="GridView1" Name="B" PropertyName="SelectedDataKey[1]" />
</SelectParameters>
</asp:SqlDataSource>
----------------------------------------------------------------------------------------------------------------------------

【Oracle】Oracle characterset US7ASCII 亂碼求生之道

環境說明：
Oracle NLS_LANG 為 "TRADITIONAL CHINESE_TAIWAN.US7ASCII"
( 之前的開發人員把DB設成 US7ASCII，Client 設成 ZHT16MSWIN950，)


Oracle的 server characterset 為 US7ASCII 時 存到 DB 中的 中文字
是以BIG5 編碼 被存入 到VARCHAR欄位中

當 DotNET 從 DB取出後，卻變成亂碼
檢查編碼 : select columns, UTL_RAW.cast_to_raw(columns) from table

columns UTL_RAW.cast_to_raw(columns)
--------------------------------------------------------------------------------------
成功路２００號 A6A8A55CB8F4A2B1A2AFA2AFB8B9

利用中文編碼解析工具 1.32 來解析
UTL_RAW.cast_to_raw(columns) 轉出來的編碼是 BIG5

好吧～進入主題 開始亂搞吧
select UTL_RAW.cast_to_nvarchar2(UTL_RAW.CONVERT(UTL_RAW.cast_to_raw(columns),'TRADITIONAL CHINESE_TAIWAN.AL16UTF16','TRADITIONAL CHINESE_TAIWAN.ZHT16MSWIN950')) as DD from table
把資料庫中的編碼當成 TRADITIONAL.CHINESE_TAIWAN.ZHT16MSWIN950
然後把它(這畜牲)轉成 TRADITIONALCHINESE_TAIWAN.AL16UTF16

好了從SQLPLUS查出來是 ??????? 看來很正常

Dim DS As DataSet, DS1 As DataSet
Dim sss As String = "select UTL_RAW.cast_to_nvarchar2(UTL_RAW.CONVERT(UTL_RAW.cast_to_raw(columns),'TRADITIONALCHINESE_TAIWAN.AL16UTF16','TRADITIONAL.CHINESE_TAIWAN.ZHT16MSWIN950')) as DD from table"

DS1 = CreateDataset(sss, "aa")  'CreateDataset 函數自己寫的
Dim DD As String = DS1.Tables(0).Rows(0).Item(0)
Dim bb() As Byte
bb = Encoding.Unicode.GetBytes(DS1.Tables(0).Rows(0).Item(0))

Response.Write(DD + " " + BitConverter.ToString(bb) + "
")

從網頁上查出來果然正常了
成功路２００號 10-62-9F-52-EF-8D-12-FF-10-FF-10-FF-5F-86

利用中文編碼解析工具 1.32 來解析 10-62-9F-52-EF-8D-12-FF-10-FF-10-FF-5F-86 為 UTF16編碼

使用函數:
1. UTL_RAW.cast_to_nvarchar2
2. UTL_RAW.CONVERT
3. UTL_RAW.cast_to_raw

PS:不知道其他適不適用...

參考Link：

Oracle UTL_RAW
Oracle UTL_RAW Package
.Convert string to and back: UTF8,UTF7,Unicode and UTF32
KB-Oracle 9i NVarchar求生守則 (黑暗執行緒)