ÈçºÎÔÚvbÖÐʵÏÖÎļþ¼Ð·ÖÅäȨÏÞµÄÎÊÌ⣿ - VB / »ù´¡Àà
Çë½Ì¸÷λ´ó´óÃÇ£º¼ÙÉè¾ÖÓòÍøÄÚÓÐA01¡¢B01¡¢C01µÈÓû§£¬ÏÖÔÚÏëÔÚ·þÎñÆ÷¶Ë£¨wind2003serv)ÓÃvbʵÏÖÈçϹ¦ÄÜ£££
1¡¢´´½¨Óû§£¬²¢¿ÉÒÔÉèÖÃÃÜÂë
2¡¢ÔÚij¸öĿ¼ÏÂÈ磺E£º\sharefilesÖн¨Á¢¼¸¸öÓëÓû§ÃûͬÃûµÄÎļþ¼Ð£¬²¢ÉèΪ¹²Ïí£»
3¡¢²¢ÉèÖÃȨÏÞΪ£ºA01Óû§Í¨¹ýÃÜÂëÖ»ÄÜ·ÃÎʲ¢ÄܶÁдA01Õâ¸öÎļþ¼ÐÖеÄÎļþ£»B01Óû§Í¨¹ýÃÜÂëÖ»ÄÜ·ÃÎʲ¢ÄܶÁдB01Îļþ¼ÐÖеÄÎļþ£¬¡¡£»
4¡¢ÇÒ¶Ôij¸öÓû§¶øÑÔ£¬ÆäËüÓû§µÄÎļþ¼ÐÊÇÒþ²ØµÄ¡£
5¡¢¿ÉÒÔÉèÖÃij¸öÎļþ¼ÐΪȫ²¿Óû§¶¼¹²Ïí£¬¿É¼ûµÄ£¬µ«Ö»ÄܶÁÈ¡¡£
ÏëÓÃvb±à³ÌʵÏÖÒÔÉϹ¦ÄÜ£¬ÆäÖеÚ1¡¢2¸ö¹¦ÄÜÒѾʵÏÖ£¬µ«ÆäËü¹¦Äܲ»ÖªÈçºÎ²ÅÄÜ×öµ½£¿
ÓÃshell" net user"ʵÏÖ´´½¨Óû§¡¢ÉèÖÃÃÜÂ룬net shareÉèÖù²Ïí£¬È¨ÏÞÒªÈçºÎÉèÖÃÄØ£¿¸ßÊÖÃdzöÊÖѽ£¡£¡
ÀÏ´ó£¬ÓÐûÓÐvb°æµÄ£¬±¾ÈËÊDz˲ˣ¬µ«»¹ÊÇÏÈллÁË£¡
ѧϰÁË£¬¹ý»á¶ù»ã±¨
ÕâÒ»¶Î½Ï棬µ½ÏÖÔڲŻ㱨¡£ÓÐÁ½ÖÖ·½·¨¡£Ò»ÖÖ¿ÉÀûÓÃnet share /grantµÄ·½·¨£¨win2003£©£¬ÁíÒ»ÖÖ¼´zhao4zhong1 Ëù˵µÄ¡£Ð»Ð»zhao4zhong1¡£É½Ò°¸çËù˵µÄadvapi32£¬ÓÉÓÚ±¾ÈËÌ«²ËÁË£¬¶ÔAPI²»ÊìϤ£¬Ã»ÓÐÉ£¬Ò²Ð»Ð»ÁË¡£½áÌùÉ¢·Ö¡£
Ïà¹ØÎÊ´ð£º
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
A 3
A 4
B 6
... ......
СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
objExlApp.Charts.Add
objExlApp.ActiveChart.ChartType = xlLine
objExlApp.ActiveChart.HasLegend = True
objExlApp. ......