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

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

   ÉÏһƪÖÐÎÒÒѾ­ËµÁËÏÂÈçºÎ²Ù×÷ACCESSÊý¾Ý¿â£¬ÏÂÃæÀ´ËµËµ´æÈ¡Í¼Æ¬£¬ÉùÒôÖ®ÀàµÄÎÊÌâ¡£
   ÓÉÓÚͼƬ£¬ÉùÒô²»ÄÜÖ±½Ó´æ´¢£¬ÕâÀï¾ÍÒªÓõ½Êý¾ÝÁ÷·½Ê½ÁË¡£¶ÔÓÚ.NETÖеÄһЩÊõÓï¸ÅÄîÎÒÈÔÈ»ºÜÃÔºý£¬ÔÚѧϰÖС£Ö÷ÒªÎÒ²»ÊÇרҵµÄ£¬
Ö»ÊÇ¿ªÊ¼Ñ§Á˵ãVB6´úÂ룬Ȼºó¾ÍÓÃVB.NETÁË£¬ËùÒÔĿǰֻÊÇ»áдµã´úÂ룬ȴ²»ÖªµÀÔ­Àí£¬ºÜ²ÑÀ¢¡£
    °¥Ó´£¬×ßÌâÁË£¬¸Ï½ô»ØÀ´£¬²»ºÃÒâ˼£¡
   
     ºÃ°É£¬ÎÒÃÇÏÈ¿´¿´Í¼Æ¬ºÍÉùÒôµÄ´æ´¢ºÍ¶ÁÈ¡¡£¿´Ï´úÂë¡£
’Õâ¶Î´úÂëÊDzåÈëͼƬºÍÉùÒôµÄ´úÂë
’µÚÒ»¸ö¾ÍÊÇͼƬÁË£¬pathµ±È»ÊÇͼƬµÄµØÖ·ÁË
Picturebyte = My.Computer.FileSystem.ReadAllBytes(PicturePath)
’ÏÂÃæÕâ¸ö¾ÍÊÇÉùÒô¿©£¬voicepath×ÔÈ»»¹ÊÇÉùÒôµØÖ·ÁË
Voicebyte = My.Computer.FileSystem.ReadAllBytes(VoicePath)

‘ÕâÀï¾Í¿ªÊ¼ÕÕ¾ÉдSQL£¬Çø±ðÒÔǰµÄµØ·½¾ÍÊÇÕâÀïÊÇÓÃCOMMANDµÄÒ»¸ö²ÎÊýÀ´¸³Öµ
str = New System.Text.StringBuilder
str.Append(" INSERT INTO WORDINFO ([PICTURE],[ENGLISHNAME],[CHINESENAME],[VOICE],[Class]) ")
str.Append(" VALUES(?,?,?,?,?)")
cmd = New OleDb.OleDbCommand(str.ToString, DBConnection)
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(0).Value = Picturebyte
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(1).Value = EnglishName
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(2).Value = ChineseName
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(3).Value = Voicebyte
cmd.Parameters.Add(New OleDb.OleDbParameter)
cmd.Parameters(4).Value = Classstring
cmd.ExecuteNonQuery()’sqlдÍêÁ˾ͿªÊ¼Ö´ÐÐ
DBConnection.Close()


Ïà¹ØÎĵµ£º

VBʵÀý —ÍòÄêÀú £¨1£©

1¡¢´´½¨¿Ø¼þ£ºlbl1¡¢txt1¡¢lbl2¡¢cmd1
2¡¢lbl1.caption=ÊäÈëÈÕÆÚ£¨ÈÎÒ»ÖÖÕýÈ·¸ñʽ£©£º
ÉèÖÃlbl1¡¢txt1¡¢lbl2¡¢cmd1µÄ×ÖÌå´óС¼°ÑÕÉ«£»
3¡¢Ë«»÷°´Å¥“È·ÈÏ”£¬Ìí¼Ó´úÂ룬Ч¹ûΪ£º
    Option Explicit
        Private Sub cmd1_Click()
  &nb ......

vb³£ÓõÄÄÚ²¿º¯Êý£¨¶þ£©£º×Ö·û´®º¯Êý


len£¨string£©£º¼ÆËã×Ö·û´®³¤¶Èº¯Êý¡£·µ»Ø×Ö·û´®stringÖÐ×Ö·ûµÄ¸öÊý¡£Ò»¸öºº×ÖΪһ¸ö×Ö·û£¬¿Õ¸ñҲΪһ¸ö×Ö·û£¬¿Õ×Ö·û´®µÄ³¤¶ÈΪ0.
Ltrim£¨string£©¡¢Rtrim£¨string£©¡¢Trim£¨string£©£º
Ltrim£¨string£©º¯Êý¹¦ÄÜÊÇ·µ»ØÉ¾³ýÁË×Ö·û´®string×ó±ß¿Õ¸ñÖ®ºóÊ£ÓàµÄ²¿·Ö¡£
Rtrim£¨string£©º¯Êý¹¦ÄÜÊÇ·µ»ØÉ¾³ýÁË×Ö·û´®ÖÐstringÓ ......

ÔÚjavaÖÐʵÏÖaccessÊý¾Ý¿âµÄÔ¶³Ì·ÃÎÊ

ÁκéÁÁ 2010/4/13
¸ÅÊö
ÔÚʵ¼ÊµÄÏîÄ¿ÖУ¬¿ÉÄÜ»áÓöµ½ÕâÑùµÄÎÊÌ⣺A·þÎñÆ÷ÉϵÄÓ¦ÓóÌÐòÐèÒª·ÃÎÊB·þÎñÆ÷ÉϵÄaccessÊý¾Ý¿â(¿ÉÒÔʹÓÃÐéÄâ»úÄ£ÄâA¡¢B·þÎñÆ÷½øÐвâÊÔ)¡£¶øaccessÊý¾Ý¿âÊÇÎļþÀàÐ͵쬲»Í¬¼ÆËã»ú¼äÐèÒªÖ¸¶¨Îļþ·ÃÎÊȨÏÞ£¬Ôö¼ÓÁ˳ÌÐòµÄ¸´ÔÓ¶È¡£±¾ÎĽ«´ÓÒ»¸öʵÀýÀ´½éÉÜÒ»ÖÖ¼òµ¥ÊµÓõķ½·¨¡£¸ÃʵÀýʹÓõķ½·¨À´×ÔInte ......

sql2005 + VB6.0 ÔÚVB6.0ÖÐÆ´SQL ×¢Òâ"()"

½ñÌìÔÚµ÷ÊԵĹý³ÌÖз¢ÏÖ ÔÚvbÖÐÆ´SQLµÄʱºò·¢ÏÖ"()" ×÷Óúܴó
eg: table: T_TEST col : T_KB int ,S_CD int ,Z_SU int
dim gcstrT_1 ,gcstrT_3  as integer
gcstrT_1  = 1
gcstrT_3  = 3
 strWhere = strWhere &  "……"
 strWhere = strWhere &  "AND ((T_K ......

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

  Ò»Ö±ÏëдÏÂÊý¾Ý¿â²Ù×÷·½ÃæµÄ£¬Ö»ÊÇûʲôʱ¼ä£¨ºÃÏñÊǽè¿Ú£¬Ó¦¸ÃÊÇÀÁ»òÕßûÐÄÇé°É£¬ºÇºÇ£©¡£×î½ü·¢ÏÖCSDNÉÏ
»¹ÊÇÿÌìÓÐÈËÒªÎÊÕâЩÄÚÈÝ£¬ÎÒÓеÄʱºò¾ÍÀÁµÄ»Ø´ð£¬ºÇºÇ£¬Ö÷Òª²»¶ÏµÄÈ¥ÕÒ´úÂë¸øËûÃÇÀÛ°¡¡£ËùÒÔ»¹ÊÇÌý¸ßÈ˵ģ¬À´
¸öÒ»ÀÍÓÀÒÝ£¬×Ô¼ºÖØÐÂÎÂϰÏ£¬Ò²ºÃ¸øÆäËûÈËһЩ°ïÖú¡£
 
    Õâ¸öÊ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ