vb Á¬½ÓoracleÊý¾Ý¿â
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
cn.Open "Provider=OraOLEDB.Oracle.1;Persist Security Info=True;User Id=system;Password=bupt8971;Data Source=TEST;"
strQuery = "select * from Patrol"
Set rs = New ADODB.Recordset
rs.Open strQuery, cn, adOpenStatic, adLockOptimistic
cmbID.Text = ""
cmbName.Text = ""
If rs.EOF Then
Else
While Not rs.EOF
cmbID.AddItem rs(0)
cmbName.AddItem rs(1)
rs.MoveNext
Wend
End If
cn.Close
Ïà¹ØÎĵµ£º
ÓÐʱ£¬ÎªÁËʵÏÖ¶¯Ì¬¸üУ¬ÎÒÃÇÐèÒª¶ÔÕý´¦ÓÚÔËÐÐ״̬µÄÓ¦ÓóÌÐò½øÐÐ×Ôɾ³ý£¬¾ÍÏñ360°²È«ÎÀÊ¿ÔÚÏßÉý¼¶ÄÇÑù¡£µ«ÊÇ£¬WindowsÊDz»ÔÊÐíɾ³ýÕý´¦ÓÚÔËÐÐ״̬µÄÓ¦ÓóÌÐòµÄ£¬Ôõô°ì£¿Ò»°ãÀ´Ëµ£¬ÎÒÃÇ¿ÉÒÔʹÓÃÁ½¸ö³ÌÐòÀ´ÊµÏÖ£¬Ò»¸öרߺÔð°æ±¾¼ì²âºÍɾ³ý£¬Ò»¸ö²ÅÊÇÒµÎñÐèÒªµÄÖ÷Ó¦ÓóÌÐò¡£Äܲ»Äܽ«¶þÕߺ϶þΪһÄØ£¿´ ......
Hey all,
Since there seems to be a fair bit of disinformation, and utter nonsense,
floating around since my talk at the Black Hat Federal security conference
the other day, I have decided to publish the following papers.
http://www.databasesecurity.com/HackingAurora.pdf
http://www.databasesec ......
ORACLE Êý¾Ý¿â¶ÔÏó
——Ë÷Òý
q Ë÷ÒýÊÇÓë±íÏà¹ØµÄÒ»¸ö¿ÉÑ¡½á¹¹
q ÓÃÒÔÌá¸ß SQL Óï¾äÖ´ÐеÄÐÔÄÜ
q ¼õÉÙ´ÅÅÌI/O
q ʹÓà CREATE INDEX Óï¾ä´´½¨Ë÷Òý
q &n ......
³ÌÐò°ü
°üÖ÷Ìå/¹æ·¶Ãû×ÖÒ»Ñù
°üÖ÷Ìå/¹æ·¶ÖеĶÔÓ¦²ÎÊý±ØÐëÀàÐͼ°Ãû×ÖÒ»Ñù
Ö»ÄÜʹÓÃÇ¿ÀàÐ͵ÄREFÓαê
´´½¨³ÌÐò°ü¹æ·¶
create or replace package my_pack
is
procedure find_emp_proc(eno emp.empno%type);
function fin ......