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

vb.net ×Ô¶¨ÒåÊý¾Ý¿âÁ´½ÓÀà(Access)

×Ô¶¨ÒåÊý¾Ý¿âÁ´½ÓÀà(Access)ÊÇÁ´½ÓAccessÊý¾Ý¿âʱʹÓõÄÀà¡£
²¹×㣺Application.StartupPath.ToStringÊÇÖ¸¶¨Éú³É.EXEÎļþµÄ·¾¶£¬°ÑÊý¾Ý¿âºÍÖ´ÐÐÎļþ´æ·Åµ½Ò»Æðʱ£¬²»¹Ü°²×°ºóÔÚʲô·¾¶¶¼ÎÞÐèÌØ¶¨Ö¸¶¨¡£
Imports System.Data.OleDb
 
 #Region "È«¾Ö±äÁ¿"
 
     Private mTimeout As Integer
     Private mDbConn As OleDbConnection
     Private mSqlConn As OleDbCommand                 'SQLÖ´ÐÐ
     Private sTblNm As String                         '´æ·ÅÊý¾ÝµÄ±íÃû
     Private mbOpen As Boolean                        'DBÁ´½ÓÅжÏÓÃ
     Private mDbReader As OleDbDataReader
     Private mDbTrans As OleDbTransaction
     Private mbTran As Boolean = False                'Transaction¿ªÊ¼ÅжÏÓÃ
     Private sSqlStr As String                        'SQLÎÄ
     Private mDbResult As DB_RESULT                   'EXECUTE·½·¨µÄ´¦Àí½á¹û
     Private mDbConnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Application.StartupPath.ToString & _
                                  &nbs


Ïà¹ØÎĵµ£º

How To ... Access the Z Depth channel

How To ... Access the Z-Depth channel
delete $VoxelBox*
rbmp
= render outputsize:[32,32] channels:#(#zdepth) vfb:
off
z_d
= getchannelasmask rbmp #zdepth
progressstart "Rendering Voxels..."
for
y = 1 to
rbmp.height do
(
progressupdate (100.0 * y / rbmp.height)
pixel_line = ......

VB ÊÓÆµ´ó¸Ù

1.ÓïÑÔ/»·¾³»ù´¡
--ÏîÄ¿µÄ×é³É
--ÓïÑÔ»ù´¡
  ----±äÁ¿µÄ×÷ÓÃÓòºÍÉú´æÆÚ
  ----»ù±¾Óï¾ä(forÑ­»·,¸³ÖµÓï¾älet(ÆÕͨ±äÁ¿¸³Öµ),set(¶ÔÏóµÄ¸³Öµ,Ö»ÓÃset),·ÖÖ§Óï¾ä)
  ----¾²Ì¬Êý×éºÍ¶¯Ì¬Êý×é(Êý×éµÄÉùÃ÷,ÉÏϽçÈ·¶¨,¶¯Ì¬Êý×éµÄʹÓÃ,¶¨ÒåеÄÖ®ºó,Ôõô±£ÁôÒÔǰµÄÊý¾Ý)
  ----Ö÷ÒªµÄϵͳº¯ÊýºÍ¹ý³Ì(By ......

vb.net²Ù×÷Êý¾Ý¿âÖ®ACCESS£¨2£©

   ÉÏһƪÖÐÎÒÒѾ­ËµÁËÏÂÈçºÎ²Ù×÷ACCESSÊý¾Ý¿â£¬ÏÂÃæÀ´ËµËµ´æÈ¡Í¼Æ¬£¬ÉùÒôÖ®ÀàµÄÎÊÌâ¡£
   ÓÉÓÚͼƬ£¬ÉùÒô²»ÄÜÖ±½Ó´æ´¢£¬ÕâÀï¾ÍÒªÓõ½Êý¾ÝÁ÷·½Ê½ÁË¡£¶ÔÓÚ.NETÖеÄһЩÊõÓï¸ÅÄîÎÒÈÔÈ»ºÜÃÔºý£¬ÔÚѧϰÖС£Ö÷ÒªÎÒ²»ÊÇרҵµÄ£¬
Ö»ÊÇ¿ªÊ¼Ñ§Á˵ãVB6´úÂ룬Ȼºó¾ÍÓÃVB.NETÁË£¬ËùÒÔĿǰֻÊÇ»áдµã´úÂ룬ȴ²»Öªµ ......

vb.net Á¬½ÓSQLÊý¾Ý¿â

     'ÔÚÒýÓÃÀïÌí¼ÓADODB
Public vscn As ADODB.Connection
Public SQLString As String
SQLString = "Provider=SQLOLEDB.1;Password=ÃÜÂë;Persist Security Info=True;User ID=ÓÃ" & _
"»§;Initial Catalog=Êý¾Ý¿âÃû;Data Source=·þÎñÆ÷Ãû"
         ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ