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

ÓÃVB»ñȡһ¸öÎļþ¼ÐϵÄËùÓÐXMLÎļþ

ÎÒÏë»ñÈ¡VBÎļþ¼ÐϵÄËùÓÐXMLÎļþ
¸ú»ñÈ¡TXTÎļþÒ»Ñù.
Ñ­»·Àú±é¼´¿É.

ÄãÈ¥ÕÒһϠͷËÑË÷Îļþ µÄVB´úÂë »òÕßÖ±½ÓÓà FileListBox È»ºó¼ÓÔØµ½Êý×é ÌáÈ¡XMLÎļþ

Äܰïæдһ¶Î´úÂëÂð

¸ø¸ö¼òµ¥Àý×Ó£º
VB code:

Dim spath As String
Dim sfile As String

spath = "vb·¾¶\*.xml"
sfile = Dir(spath)
While sfile <> ""
sfile = Dir()
Wend


lz²ÎÕÕ×Ô¼º¸Ä¸Ä°É¡£

FileSystemObject

'Ò²¿ÉÒÔshellÔËÐÐdirÃüÁî
shell("cmd /c dir /b /s /a-d d:\Îļþ¼Ð\*.xml >d:\allxml.txt")
'È»ºó¶Ád:\allxml.txtµÄÄÚÈÝ


Ïà¹ØÎÊ´ð£º

Êý¾Ý±íÉú³ÉÌØ¶¨¸ñʽµÄxml - .NET¼¼Êõ / ASP.NET

´ÓÊý¾Ý¿âÖвéѯһÕűíµÄÊý¾Ý
select ²¿ÃÅ,ÐÕÃû from tb
ÈçºÎ²ÅÄÜÉú³ÉÏÂÃæµÄxml¸ñʽÎļþ
<folder state="unchecked" label="È«²¿">
¡¡¡¡<folder state="unchecked" isBra ......

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

vb ÖÐ - VB / »ù´¡Àà

dim a as string,b as string£¬c as string
a="¹¤³Ì±àºÅ,µ¥Î»¹¤³ÌÃû³Æ,·Ö²¿¹¤³Ì±àºÅ"
b="µ¥Î»¹¤³ÌÃû³Æ"
c="µ¥Î»"
Ôõô²ÅÄÜÅжϳöa×Ö·û´®ÖдæÔÚb×Ö·û´®£¬¶ø²»´æÔÚc×Ö·û´®

¿´¿´i ......

vb²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ