ÔõôÓÃVB×öÔ¶³ÌÉÏ´«ÎļþʱµÄ½ø¶ÈÌõ£¿
ÎÒÔÚÓÃVBдһ¸ö½«ÊÓƵÎļþÉÏ´«µ½Ô¶³ÌÊý¾Ý¿âµÄС³ÌÐò£¬ÏÖÔÚÏëÒªÓýø¶ÈÌõÀ´ÏÔʾµ±Ç°ÉÏ´«µÄ½ø¶È£¬ÇëÎÊÒªÔõô×öÄØ£¿ÎÒÊǸöÐÂÊÖ£¬ËùÒÔÂé·³´ó¼Ò°ÑÒâ¼ûдÇå³þһЩ£¬ÓдúÂë×îºÃÀ²£¬Ð»Ð»£¡
ÒªÍêÈ«ÕýÈ·±È½ÏÀ§ÄÑ¡£
¹À¼ÆÏ°ɣ¬Ç°¼¸ÌìÓиöÀàËƵÄÎÊÌâ¡£
ÉÏ´«Äã»á°É£¬
ÄÇô½ø¶È¾Í¼òµ¥ÁË£¬
ÿ´Î´«¶àÉÙÄã×Ô¼º¶¨£¬È»ºóÕû¹»ÎļþµÄ´óС³ýһϾͿÉÒÔÁË
Êʵ±µÄʱºòˢоÍÐÐÁË
Èç¹û²»»áÉÏ´«
ÄãµÃ˵һÏÂÄãÓõÄÊÇɶ¼¼Êõ
FTP¡¢WEBSERVICE¡¢HTTP»òÕßÆäËû
ÎÒ²»Ã÷°×Â¥ÉÏËù˵µÄ¼¼ÊõÖ¸µÄɶ¡£¡£µ«ÊÇÕâÊÇÎÒÓÃÀ´Á¬½ÓÊý¾Ý¿âµÄÁ¬½Ó×Ö·û´®£º
conn.ConnectionString = "driver={SQL SERVER};connectiontimeout=0;uid=sa;pwd=;database=Êý¾Ý¿âÃû;server=·þÎñÆ÷Ãû"
´óÏÀ°ïæ·ÖÎöһϣ¬ÒªÔõô֪µÀÄ¿Ç°ÒѾ´«Á˶àÉÙ£¿
¿ÉÒÔ
ADODB.Recordset.Fields(index).AppendChunk
×Ô¼º¼Ó¼Ó¼õ¼õ³Ë³Ë³ý³ýµÄ¾ÍOKÁË
ÆäÖÐindexÊÇÄãµÄ×Ö¶Î˳ÐòºÅ£¬Ò²¿ÉÒÔʹÓÃ
ADODB.Recordset.Fields(×Ö¶ÎÃû).AppendChunk
°ï¶¥
°ï¶¥
vb²»ºÃ×öµÄ¡£¡£
Ïà¹ØÎÊ´ð£º
Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
ÔÚvbÖÐÔõôÅжϣ¬²åÈëµ½Êý¾Ý¿âÖеÄÖµÊÇÖظ´µÄ£¬±¾È˲ŸսӴ¥VBÓïÑÔ£¬ÉõÊÇÓкöàµØ·½»¹²»¶®£¬»¹Çë¸÷λ´óÏÀÃǸø³ö´úÂ룬ллÁËѽ£¡£¡£¡
²åÈë֮ǰselectһϰ¢¡£
»òÕßдһ¸ö×éºÏSQL²åÈëÓï¾ä£¬ÀýÈç
IF not Exist(
& ......
³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æͼ°å£¨ÆÁÄ»,Piceure1£©µÄÒƶ¯ÎÊÌâÒѾ½â¾ö¡£
Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
Picture1.Left = -HScroll1.Value + bcW ' ......
¸÷λ´óϺ£º
ÎÒÊǸÕѧVB£¬ÏÖÔÚÏëÓÃVBµ÷ÓÃÒ»¸ö¶¯Ì¬¿â£¬¶¯Ì¬¿âÀïÃæÓкܶຯÊý¡£ÎÒÖªµÀʹÓÃVBµ÷Óö¯Ì¬¿âµ÷Óú¯Êý£¬ÐèÒª½«Òªµ÷Óõĺ¯ÊýÔÚ³ÌÐòÖÐÉùÃ÷¼´¿É£¬µ«ÊÇÀïÃæÓкܶຯÊý£¬²»»áÿһ¸öº¯Êý¶¼ÒªÉùÃ÷°É¡£Çë¸ ......