Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ÐÂÊÖÇë½Ì£¬¹ØÓÚVBÓÃADOÁ¬½ÓORACLEµÄÏêϸ½Ì³Ì£¡£¡Ð»£¡

[size=11px][/ÎÒÊÇÒ»¸öVBÐÂÊÖ£¬ÏëѧϰһÏÂÔõôÓÃADOÁ¬½ÓORACLE,ÔÚÂÛ̳¿´Á˰ëÌìµÄÌù×Ó£¬Ô½À´Ô½ºýÍ¿£¬Ï£Íû´óϺÃÇÄܸø¸öÏêϸµãµÄ½Ì³Ì£¡£¡[size]
²»Òª¿´Ìù×Ó£¬ÏÈ¿´Ò»Ï£Á£Ä£ÏµÄ½éÉÜ£¬ÆäÖÐÓкܶàÀý×Ó¡£

¸øÄã¶Î´úÂ룬¿´ÄÜ·ñ¿´¶®
'ÒýÓÃado¶ÔÏó2.5
Dim cnGet As ADODB.Connection
Dim rsGet As ADODB.Recordset
sConnect = " Provider=MSDASQL.1;Data Source=ODBCÊý¾ÝÔ´;Persist Security Info=True;User ID= Óû§;Password= ÃÜÂë"
Set cnGet = New ADODB.Connection
cnGet.Open sConnect
Set rsGet = New ADODB.Recordset
sSql= "select * from ...."
rsGet.Open sSql, cnGet, adOpenStatic, adLockReadOnly


лл¥Éϵģ¬ÎÒÒѾ­½â¾öÁËÁ¬½ÓÊý¾Ý¿âµÄÎÊÌ⣬¿ÉÊÇÓоä´úÂë²»ÖªµÀ¸ÃÔõôд¡£°ïÎÒ¿´Ï£¡

select table1.aaa,table2.bbb,table2.ccc from table1,table2 where table2.bbb='"&text1.text&"' and table1.aaa=table2.aaa

Õâ¾ä²éѯÔõô°Ñtable1ºÍtable2ÕâÁ½¸ö±íд³ÉtextÀïÃæÊäÈëµÄÄÚÈÝ£¿ÏñϱßÕâÑùµÄ£º

select ¡°text2.text¡±.aaa,"text3.text".bbb,table2.ccc from table1,table2 where table2.bbb='"&text1.text&"' and table1.aaa=table2.aaa

ÄãµÄÓï¾äÓÐÎÊÌâ¡£
table1 ºÍtable2µÄ¹ØÏµ£¿

VB code:
Dim strSQL As String
strSQL = "select " & Text1 & ".a," & Text1 & ".b,&quo


Ïà¹ØÎÊ´ð£º

Çë½ÌsqlÓï¾ä¡£ - Oracle / ¿ª·¢

ÎÒÓÐÒ»¸ö±í£¬½á¹¹ÊÇÕâÑù¡£
  ת³ö µ¥Î» תÈ뵥λ ±ÊÊý ½ð¶î
date(Ö÷) outid(Ö÷) inid(Ö÷) num amt
2009 1 2 1 500 Ϊ 1 µ¥Î» ÔÚ2009Ä ......

vbÖÐÈçºÎʵÏÖ¶ÔÏóÊôÐԵĶ¯Ì¬ÉèÖà - VB / »ù´¡Àà

±¾ÈËʹÓõÄÊÇVB6.0°æ±¾
¼ÙÉèÓÐÒ»¸ö¶ÔÏóA£¬AÄÚÓÐÀàÐÍΪBµÄ¶ÔÏóÊôÐÔ¡£ÏÖÔÚµÄÎÊÌâÊÇ£¬ÐèÒªÌí¼ÓÈô¸É¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔ¡£È磬
 A.B1,A.B2,...
µ«¾ßÌåÌí¼Ó¶àÉÙ¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔÔòÊÓ¾ßÌåÇé¿ö²»Í¬¶ø²»Í¬ ......

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......

pl/sql - Oracle / ¿ª·¢

СµÜ£¬×î½üҪתÐÐÈ¥×öoracle¿ª·¢ÁË£¬ÓÉÓÚ´óѧ±Ïҵʱ£¬×ßÁ˸öÍä·£¬ÏÖÔÚºÜСÐÄ£¬ÎÊÏ£¬×öPL/SQLÓÐûÓÐǰ;£¿£¿£¿
µ±È»ÎÒ˵µÄÕâ¸öǰ;ÊÇÖ¸ ÒÔºóÒªÌø²Û£¬Êг¡¶ÔÕâÑùµÄÈ˲ŵÄÐèÇóÁ¿´ó²»´ó£¿£¿

3q ÄÇ¿´À´»¹Ö»ÄÜÏȽӴ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ