عملیات بر روی فولدرها

[ali190]

با سلام و عرض خسته نباشید
1-فرض کنید بنده از طریق دو دستور زیر قصد دارم یک فولدر جدید در سیستم ایجاد کنم:

Private Sub Command0_Click()
MkDir "c:\a"
End Sub
Private Sub Command1_Click()
fso.CopyFolder "c:\a", "d:\a"
End Sub

اگر در مسیری که میخوام فولدرها در آنجا ایجاد شود فولدری همنام موجود باشد ، از چه طریق میتوان این موضوع رو متوجه شد؟
2-با چه اکتیو ایکسی از اکتیوایکسهای مجود در خود Vb میتونم فولدرهای مجود درسیستم خود رو ببینم و اگر فولدری رو هم اضافه کردم این فولدر جدید بعد از ایجاد سریعاً در این اکتیوایکس هم نمایان ششود.
آیا اکتیوایکسی هم وجود دارد که مه فقط فولدرهای یک درایو خاص (مثلاً \:d)را نمایش دهد؟
میشه لطف کنید و این موارد رو در یک فایل نمونه مثال بزنید.
ممنونم

[vbhamed]

سلام

با همون fso ميشه وجود folder رو چك كرد


if fso.FolderExists("...") Then ...

براي سؤال بعدي هم كافيه يك كنترل DirListBox از جعبه ابزار رو فرمتون بزاريد و با يك تايمر اونو Refresh كنيد
اينطوري هم مي تونيد مسير بهش بدين


Private Sub Form_Load()

Dir1.Path = "d:\"
Dir1.Refresh

End Sub

Private Sub Timer1_Timer()

Dir1.Path = "d:\"
Dir1.Refresh

End Sub