ADOConnection Á¬½Óoracle Çë½Ì
ADOConnection¡¢dbexpora Á¬½Óoracle ¾ÍÊÇÁ¬²»ÉÏ£¬ora£12546´íÎó¡£
ÓÃodbcÄÜÁ¬ÉÏ£¬pl/sqlÒ²ÄܵǼ¡£
ÔõôŪ°¡£¿Ð»Ð»£¡
Èç¹ûplsqlÄÜÁ¬ÉÏ,¿´Ñù×ÓtnsÅäÖÃÓ¦µ±Ã»ÎÊÌâ,¹À¼Æ¾ÍÊÇÄãµÄÁ¬½Ó×Ö´®ÓÐÎÊÌâ,
adoconnectionµÄÁ¬½ÓÊÇÔõôдµÄ£¬Ò»°ãÑ¡ÔñoracleµÄÄǸöÇý¶¯£¬±ðÓÃ΢ÈíµÄ¡£
×îºÃÓÃodac£¬Õâ¸öÁ¬½Óoracle×î·½±ã¡£
odacûÓÐÏÂÔØµ½¡£ÎÒ¹À¼ÆÈ±ÉÙdll£¨³ýÁËoracle¿Í»§¶ËµÄ£©
¸øÄã¸öº¯Êý
Delphi(Pascal) code:
function ConnectOraAdo(sServerip, sUser, sPass, sDbName: string; bKeep: Boolean; var ADOConn: TADOConnection): Boolean;
begin
with ADOConn do
try
try
if ADOConn = nil then
ADOConn := TADOConnection.Create(nil)
else ADOConn.Close;
ADOConn.CommandTimeout := 30;
ADOConn.ConnectionTimeout := 30;
ADOConn.KeepConnection := bKeep;
ADOConn.LoginPrompt := false;
ADOConn.ConnectionString := 'PLSQLRSet=1;DistribTX=0;Provider=OraOLEDB.Oracle.1;'
+ 'Persist Security Info = True;'
+ 'Data Source=' + sServerip + ';'
+ 'User ID=' + sUser + ';'
+ 'Password =''' + Trim(sPass) + '''';
if Connected then Close;
CursorLocation := clUseClient;
Open;
Connected := True;
result := True;
except
on E: Exception do
begin
Result := False;
end;
end;
finally
end;
end;
o
Ïà¹ØÎÊ´ð£º
oracleÁ¬½ÓɶÕâô¸´ÔÓ°¡.
oracle 10g
ÓÃps/sql devÔõôҲÁ¬²»ÉÏ.
ÓÃsqlplus¿ÉÒԵǽ.net manager֮ǰ²âÊÔÁ¬½ÓÁ˳ɹ¦µÄ.ÏÖÔÚ¸ãµÃÒ²Á¬½Ó²»ÁË.
listener.ora:
SID_LIST_LISTENER =
(SID_LIST =
......
¸÷´óÀÏʦºÃ£¬Çë½ÌÒ»¸öÎÊÌ⣮
ÎÒÉèÖÃÁËÒ»¸öoracle×ֶΣ¬varchar(3000),È»ºó²åÈëÒ»ÌõÊý¾Ý³¤¶È²Å1000,¾Í±¨´íÁË£®È磺net.sf.hibernate.exception.GenericJDBCException: Could not execute JDBC batch update
Caused ......
Êý¾Ý¿â£ºOracle10g(10.2)
Ó¦ÓãºÒ»¸öC#µÄ³ÌÐòдÊý¾Ý¿â£¬Ò»¸öJSP³ÌÐò¶ÁÊý¾Ý¿â
¸ºÔØ£ºÄ¿Ç°´¦ÓÚ¿ª·¢½×¶Î£¬»ù±¾ÉÏÖ»ÓÐ3-4¸öÓû§·ÃÎÊJSPÍøÕ¾¡£
ÏÖÏó£ºÖØÐÂÆô¶¯ºóµÄÊý¾Ý¿â²éѯ·Ç³£¿ì£¬µ«ÊÇÓÃ×ÅÓÃ×ÅÔ½À´Ô½Âý£¬ËùÓÐJSPÍøÒ ......
ÎÒÏÈ˵Ã÷Ò»ÏÂÇé¿ö£ºÓÐÒ»¸örec1.batµÃÅú´¦ÀíÎļþÀï±ß´úÂëÈçÏ£º
SET ORACLE_SID=TosmecDB
sqlPLUS /nolog "@c:\tosmec\sys\syscom\TosmecHotSub1.sql"
TosmecHotSub1.sqlµÄÎļþÄÚÈÝÈçÏ ......
ÏÖÓÐÒÔÏÂÊý¾Ý£º
ID Name
1 Jack,Tom,Ben
2 Mary,Simth,Tony,Jay
ת»»Îª£º
ID Name
1 Jack
1 Tom
1 Ben
2 Mary
2 Simth
2 Tony
2 Jay
ÒªÇóʹÓÃSQL²éѯÍê³É£¬ÓÉÓÚÌõ¼þÏÞÖÆ£¬²»ÄÜʹÓà ......