Thaiadmin

อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ ๐olo๐ HoW ๐olo๐

  • *****
  • 452
  • 2
  • เพศ: ชาย
  • ...โอกาสเป็นของคนที่รู้จักไขว่คว้า...
อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« เมื่อ: 14 กุมภาพันธ์ 2007, 09:22:38 »
อยากได้คำสั่ง ค้นหาไฟล์ ที่ต้องการ ตาม parth ที่สามารถกำหนดครับ สามารถกำหนด parth เองได้

เช่น หาไฟล์ c:\*.txt   หรือ d:\music\xxx.mp3 ประมาณนี้

โดยใช้ปุ่ม Browse ในการหา Parth แล้วพิมพ์ชื่อไฟล์หรือประเภทที่จะทำการค้น  แล้วเรียกออกมาทางหน้าจอ
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย

ออฟไลน์ Mr.Thodsapol

  • *****
  • 31
  • 0
  • เพศ: ชาย
Re: อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« ตอบกลับ #1 เมื่อ: 14 กุมภาพันธ์ 2007, 11:48:46 »
เอาแบบ ง่ายๆ น่ะครับ (ลองดูไม่รู้จะตรงกับความต้องการหรือเปล่า)

1.Create New Form
2.Add Control DriveListbox  in your Form (name=Drive1)
3.Add Control DirListbox in your Form (name=Dir1)
4.Add Control FileListbox in your Form (name=File1)
5.Add Control Textbox (name=Text1)

แล้วเขียน Code ใน Program ตามนี้ อ่ะครับ

Private Sub Dir1_Change()
File1.Path = Dir1
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1
End Sub

Private Sub Text1_Change()
On Error Resume Next
File1.Path = Dir1
File1.Pattern = Text1
End Sub

จาก:ผู้ผ่านมา
todsapol_m
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย

ออฟไลน์ ๐olo๐ HoW ๐olo๐

  • *****
  • 452
  • 2
  • เพศ: ชาย
  • ...โอกาสเป็นของคนที่รู้จักไขว่คว้า...
Re: อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« ตอบกลับ #2 เมื่อ: 15 กุมภาพันธ์ 2007, 10:02:03 »
มัน ERROR ครับ ไม่ทราบว่าต้องใช้ Properties ตัวไหน
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย

ออฟไลน์ Hingred

  • **
  • 279
  • 2
  • เพศ: ชาย
  • วันนี้ขอสั่งสมความรู้ เพื่อสักวันหนึ่งเราจะเก่ง
Re: อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« ตอบกลับ #3 เมื่อ: 15 กุมภาพันธ์ 2007, 10:30:02 »
เอาแบบ ง่ายๆ น่ะครับ (ลองดูไม่รู้จะตรงกับความต้องการหรือเปล่า)

1.Create New Form
2.Add Control DriveListbox  in your Form (name=Drive1)
3.Add Control DirListbox in your Form (name=Dir1)
4.Add Control FileListbox in your Form (name=File1)
5.Add Control Textbox (name=Text1)

แล้วเขียน Code ใน Program ตามนี้ อ่ะครับ

Private Sub Dir1_Change()
File1.Path = Dir1
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1
End Sub

Private Sub Text1_Change()
On Error Resume Next
File1.Path = Dir1
File1.Pattern = Text1
End Sub

จาก:ผู้ผ่านมา
todsapol_m


ก็ได้นี่ครับ ไม่เห็นมี Error เลยครับ (ดัง File แนบเลยครับ)
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย

ออฟไลน์ ๐olo๐ HoW ๐olo๐

  • *****
  • 452
  • 2
  • เพศ: ชาย
  • ...โอกาสเป็นของคนที่รู้จักไขว่คว้า...
Re: อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« ตอบกลับ #4 เมื่อ: 15 กุมภาพันธ์ 2007, 10:55:24 »
ขอบคุณมากครับ ผมยัง งง อยู่เลยว่ามัน Error อะไร ทั้งๆที่ก็เหมือนๆกันหมด แต่พอรันเครื่องข้างๆแล้วผ่าน งงอะดิ สงสัยเครื่องเน่า
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย

ออฟไลน์ ๐olo๐ HoW ๐olo๐

  • *****
  • 452
  • 2
  • เพศ: ชาย
  • ...โอกาสเป็นของคนที่รู้จักไขว่คว้า...
Re: อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« ตอบกลับ #5 เมื่อ: 15 กุมภาพันธ์ 2007, 11:55:31 »
ทีนี้ผมมีปัญหาอยู่ว่า ผมจะลบไฟล์ ยังไง ในโฟล์เดอร์ โดยที่ลบ บางตัว เช่น

ผมมีไฟล์ *.log ทั้งหมด 15 ไฟล์ แต่ผมต้องการลบ แค่ บางตัว โดยให้มันรันเอง เช่น จะลบไฟล์ ที่บันทึกไว้ก่อนวันที่ ปัจจุบัน 10 วัน

ชื่อ 01012007.log /02012007.log/05022007.log

โดยใช้ Command กดทีเดียว

ผมรู้ว่า ไฟล์แรกจะได้ค่า Listindex = 0 แล้วก็ต่อไปเรื่อยๆ  แต่ผมจะเอาชื่อไฟล์นั้นออกมายังไง

เพราะผมใช้คำสั่ง Kill() ในการลบ
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย

ออฟไลน์ ๐olo๐ HoW ๐olo๐

  • *****
  • 452
  • 2
  • เพศ: ชาย
  • ...โอกาสเป็นของคนที่รู้จักไขว่คว้า...
Re: อยากได้คำสั่ง ค้นหาไฟล์ ของ VB6
« ตอบกลับ #6 เมื่อ: 15 กุมภาพันธ์ 2007, 12:18:32 »
ได้แล้วครับ  ขอบคุณสำหรับคำแนะนำ ลองอยู่นาน  แล้วจะมาถามอีก อิอิ คนมีความรู้น้อยก็เงี่ย
กลุ่มผู้ดูแลระบบแห่งประเทศไทย ขอระงับการใช้ลายเซ็นต์รูปภาพ
อนุญาตให้ใช้ได้เพียง ลายเซ็นต์ที่เป็นข้อความ
จึงประกาศมาเพื่อขอความร่วมมือ จากสมาชิกทุกๆ ท่าน
ในนาม กลุ่มผู้ดูแลระบบแห่งประเทศไทย