Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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 Formatº¯Êý

Format[$] ( expr [ , fmt ] )
format ·µ»Ø±äÌåÐÍ
format$ Ç¿ÖÆ·µ»ØΪÎı¾
--------------------------------
Êý×ÖÀàÐ͵ĸñʽ»¯
--------------------------------
    ¹Ì¶¨¸ñʽ²ÎÊý£º
    General Number ÆÕͨÊý×Ö£¬Èç¿ÉÒÔÓÃÀ´È¥µôǧλ·Ö¸ôºÅ
    format$("100 ......

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 ÊÓƵ´ó¸Ù

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

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

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