กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
404 6
URL.หัวข้อ /
URL
เรียนอ.สุภาพ : ปัญหา FileDialog() ครับ.
ในNorthWind.mdb ในฟอร์ม Employee การใช้ subprocedure GetFileName()เพิ่อเลือกรูปภาพพนักงานเข้าไว้ในtable Employee. Procedureนี้เป็นตัวอย่างการใช้Object FileDialog()ในการเก็บPathของแต่ละรูปที่ถูกเลือกไปไว้ในแต่ละRecord ซึ่งสะดวกดีมาก. โดยdefault โปรแกรมจะเปิดโฟลเดอร์ที่เก็บApplication(.mdb file)และแสดงไฟล์ภาพให้เลือก อยากเรียนถามอาจารย์ว่ามีถ้าจะเปลี่ยนdefault folder ไปเป็นfolder อื่น(ที่ไม่ใช่ Application folder)จะทำได้หรือไม่อย่างไร
ต.ย.เช่นในการซ่อมรถถ้าต้องการเลือกภาพรถคันหนึ่งที่กำลังซ่อมที่ถ่ายไว้หลายภาพตามขั้นตอนต่างๆของการซ่อม ในsubform ก็อยากให้โปรแกรมไปเปิดfolderที่เก็บภาพทั้งหมดรถคันนั้น (สมมติให้ตั้งชื่อfolderนี้ตามเลขทะเบียนรถคันนั้น ซึ่งใช้เป็นKeyของrecord ใน Parent form ด้วย เป็นต้น)
ต.ย.เช่นในการซ่อมรถถ้าต้องการเลือกภาพรถคันหนึ่งที่กำลังซ่อมที่ถ่ายไว้หลายภาพตามขั้นตอนต่างๆของการซ่อม ในsubform ก็อยากให้โปรแกรมไปเปิดfolderที่เก็บภาพทั้งหมดรถคันนั้น (สมมติให้ตั้งชื่อfolderนี้ตามเลขทะเบียนรถคันนั้น ซึ่งใช้เป็นKeyของrecord ใน Parent form ด้วย เป็นต้น)
6 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R06362
รบกวนอาจารย์อีกครั้งนะครับ
ผมลองเปลี่ยนตรง = CurrentProject.path ไปเป็นFolder อื่นที่มีอยู่จริงในDrive เช่น "C:\mydocument\mypicture" ปรากฎว่าในDialog box ที่จะให้เลือกรูป กลับปรากฎ ชื่อ mypicture ในช่อง filename แทน ราวกับว่าชื่อ mypicture เป็นชื่อรูปภาพรูปหนึ่งในโฟลเดอร์ mydocumentไปเลยครับ
รบกวนอาจารย์ช่วยกรุณาดูให้อีกครั้งนะครับ ขอบพระคุณครับ
ผมลองเปลี่ยนตรง = CurrentProject.path ไปเป็นFolder อื่นที่มีอยู่จริงในDrive เช่น "C:\mydocument\mypicture" ปรากฎว่าในDialog box ที่จะให้เลือกรูป กลับปรากฎ ชื่อ mypicture ในช่อง filename แทน ราวกับว่าชื่อ mypicture เป็นชื่อรูปภาพรูปหนึ่งในโฟลเดอร์ mydocumentไปเลยครับ
รบกวนอาจารย์ช่วยกรุณาดูให้อีกครั้งนะครับ ขอบพระคุณครับ
3 @R06369
ผมเปลี่ยนเป็น
.InitialFileName = "C:\Documents and Settings\Administrator\My Documents\My Pictures"
ก็ใช้ได้ปกติดีครับ
.InitialFileName = "C:\Documents and Settings\Administrator\My Documents\My Pictures"
ก็ใช้ได้ปกติดีครับ
4 @R06381
อ.สุภาพครับ
ที่อาจารย์กรุณาแนะนำมาให้ถูกต้องแล้วครับผมกลับไปทดลองทำดู ใช้ได้ดีแล้วครับ
ขอบพระคุณอาจารย์อีกครั้งครับ.
ที่อาจารย์กรุณาแนะนำมาให้ถูกต้องแล้วครับผมกลับไปทดลองทำดู ใช้ได้ดีแล้วครับ
ขอบพระคุณอาจารย์อีกครั้งครับ.
5 @R06391
คุณสุวัฒน์ และ อาจารย์สุภาพครับ
ผมทดลองทำตามนี้แล้ว ปรากฎว่า error ที่บรรทัด .Filters xxx ครับ
ไม่ทราบว่าผมต้องเลือก references อะไรเพิ่มอีกด้วยหรือเปล่าครับ
ผมทดลองทำตามนี้แล้ว ปรากฎว่า error ที่บรรทัด .Filters xxx ครับ
ไม่ทราบว่าผมต้องเลือก references อะไรเพิ่มอีกด้วยหรือเปล่าครับ
6 @R06413
คุณเอนกครับ,
ลง microsoft office 10.0 Object Library ครับ.
ลง microsoft office 10.0 Object Library ครับ.
Time: 0.1086s
.InitialFileName = CurrentProject.path
ให้เป็น Folder ที่ต้องการครับ