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

ÇóvbÔ¶³ÌÁ¬½ÓoracleÊý¾Ý¿âµÄ³ÌÐò

ÎÒÓиöС³ÌÐò£¬ÐèÒª´Óµ¥Î»µÄoracleÊý¾Ý¿âÖжÁÈ¡Êý¾Ý£¬µ«ÊDz»ÖªµÀ¸ÃÔõôд£¬Çë¸÷λ¸ßÊÖÖ¸µã£¬×îºÃÓÐʵÀý£¬»òÔ´³ÌÐò¡£Ð»Ð»ÁË
http://www.connectionstrings.com/oracle

¶¥Æð

Á¬¿â
Dim DLYHM, DLMM, DLSLM As String
Dim Grecordset As New ADODB.Recordset
Dim Gconnection_HQ As New ADODB.Connection
DLYHM = "USER ID=" + Óû§Ãû
DLMM = "password=" + µÇ¼ÃÜÂë
DLSLM = "Data Source=" + DBCSÖеÄʵÀýÃû
LSsjk = DLYHM + ";" + DLMM + ";" + DLSLM
LSsjk = "Provider=OraOLEDB.Oracle.1;Persist Security Info=False;" + LSsjk
    Set Gconnection_HQ = New ADODB.Connection
    Gconnection_HQ.Open LSsjk

¶ÁÊý¾Ý
Set Grecordset = New ADODB.Recordset
Grecordset.Open "select * from ±íÃû where ×Ö¶ÎÃû='" & ×Ö¶ÎÖµ & "'", Gconnection_HQ, adOpenStatic, adLockOptimistic    ¡®Ë÷ÒýÌõ¼þ
±äÁ¿ = Trim(Grecordset.Fields("¶ÁÈ¡×Ö¶ÎÃû"))
Grecordset.Close


Äܲ»ÄܰÑÔ´³ÌÐò·¢¸øÎÒ°¡£¬ÎÒµÄÓÊÏ䣬Èç¹û³É¹¦ÂíÉϸøÄã½á·Ö£¬Âé·³ÁË£¬Å¼ÏÈллÁË£¡

ustbzhy@163.com£¬Ð»Ð»

×Ô¼º¸ù¾Ý´úÂë¸ÄһϾͿÉÒÔÁË£¬²»ÒªÊ²Ã´¶¼ÒªÔ´´úÂ룬ÔÛÃÇÖ®¼äÓõĸ÷ÖÖÐÅÏ¢¶¼²»Ò»Ñù£¬¸øÄãÒ²µÃ×Ô¼º¸Ä

ÐèÒª°²×°oracel¿Í»§¶Ë

oracle¿Í»§¶Ë×°ÉÏÁË£¬µ«ÊÇÓ¦¸ÃÈçºÎÅäÖÃÄØ

ÒýÓÃ
oracle¿Í»§¶Ë×°ÉÏÁË£¬µ«ÊÇÓ¦¸ÃÈçºÎÅäÖÃÄØ

×îºÃ½


Ïà¹ØÎÊ´ð£º

VB iniÎļþдÈë ¶ÁÈ¡ - VB / »ù´¡Àà

¿´ÁËһЩVB iniÎļþдÈë¶ÁÈ¡µÄ·½·¨ µ«ÊÇ»¹ÊDz»ÖªµÀÔõôд£¬ÉÏÃæÐ´Á˺ܳ¤ ºÜ¶à£¬µ«ÊÇÎÒ²»ÖªµÀÔõôÓã¬ÎÒÏëÎÊÒ»ÏÂÔõÑùд²ÅÄÜʵÏÖÔÚTEXT1ÖÐд×Ö£¬È»ºóµãCommand1Ìá½»£¬È»ºóTEXT1ÀïÃæµÄÊý×Ö¾Íд½øINIÀïÃæ[Section]µÄKey1 ......

oracleÊý¾Ý¿â »º³å³Ø - Oracle / »ù´¡ºÍ¹ÜÀí

ÇëÎÊÕâ¸ö»º³å³ØÊÇÔõô»ØÊ°¡£¿¿ÉÒÔÁ¬½Ó»º³å³ØÀûÓÃÆäÖеÄÊý¾Ý°É£¿ÔõôÓã¿
Õâ¸öÊÇoracle×Ô¶¯×öµÄ£¬Ò»°ãÓ¦ÓóÌÐòÊDzÙ×÷²»Á˵ġ£

²»ÄÜÖ±½ÓÁ¬½ÓÂð£¿

ÒýÓÃ
²»ÄÜÖ±½ÓÁ¬½ÓÂð£¿
²»ÄÜ

ÄÇ»º³å³ØÀïµÄÊý¾ÝÒ²²»Äܲéѯ ......

VB µÄ PictureBOX ¿Ø¼þ»æÍ¼ÎÊÌâ - VB / ¿Ø¼þ

³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æÍ¼°å£¨ÆÁÄ»,Piceure1£©µÄÒÆ¶¯ÎÊÌâÒѾ­½â¾ö¡£
  Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
  Picture1.Left = -HScroll1.Value + bcW ' ......

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ