แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - kitisak

หน้า: [1] 2
1
ห้อง MS Access / Invalid procedure call or argument
« เมื่อ: 31 ก.ค. 63 , 18:54:21 »
อยู่ดี ๆ มันฟ้องว่า Invalid procedure call or argument หลาย ๆ ฟอร์ม สาเหตุเพราะอะไร และแก้ไขอย่างไรครับ

2
เราจะเขียนโค๊ดอย่างไร เพื่อให้ใน textbox ไม่ให้พิมพ์ตัวอักษรต้องห้ามในการตั้งชื่อไฟล์ เช่น / * ? ครับ

3
จะซ่อนทั้งกลุ่ม โชว์ทั้งกลุ่ม แบบนี้ได้อย่างไร (คือมีวิธีเอา text box มาเป็นกลุ่มเดียวกัน แล้วซ่อนทั้งกลุ่ม)
เช่น
txtGroup1A0.visibel = false
txtGroup1A1.visibel = false
txtGroup1A2.visibel = false
txtGroup1A3.visibel = false
txtGroup1A4.visibel = false
txtGroup1A6.visibel = false

4
ผมทำการ copy ไฟล์ และลบไฟล์เดิมทิ้ง
ปัญหามีว่า ไฟล์เดิม มันเปิดอยู่ คำสั่งไม่ทำงาน เราจะคำสั่งยังไง หากไฟล์เปิดอยู่ให้ปิดก่อนแล้วลบทิ้ง
***
Dim sPath, sfilename, sLink, sCopyInto, myOutput As String
Dim fso As Object
    Set fso = CreateObject("Scripting.FileSystemObject")
    sfilename = GetFileName
    myOutput = Right(sfilename, Len(sfilename) - InStrRev(sfilename, "."))
    sPath = GetFilePath
    sLink = sPath & sfilename
   
   'If Dir("CurrentProject.path & '\map\' & Me.NewName & '.' & myOutput", vbNormal) = "" Then
   
   
    sCopyInto = [Forms]![manHisInsu]![folderInsu] & "\" & [Forms]![manHisInsu]![Even2] & "." & myOutput
    fso.CopyFile sLink, sCopyInto
    Set fso = Nothing
   
    If sPath = [Forms]![manHisInsu]![folderInsu] & "\" Then
        Else
        Kill sLink
    End If
   
   
    MsgBox ("บันทึกเรียบร้อยแล้ว"), vbInformation, "ผลการทำงาน"

Exit_Command33_Click:
    Exit Sub

Err_Command33_Click:
    MsgBox " ไฟลนี้อาจเปิดอยู่ ให้ปิดไฟล์นี้เสียก่อน"
    Resume Exit_Command33_Click

5
จะตรวจสอบว่าใน textbox มีอักษรไทยปนหรือไม่
ถ้ามีให้มี msgbox แจ้งเตือน ต้องทำอย่างไรครับ

6
ห้อง MS Access / ลบไฟล์ที่เลือก
« เมื่อ: 24 ส.ค. 61 , 16:06:40 »
เราจะลบไฟล์จากไดอะล็อกบ๊อกซ์ ที่เราสร้าง จะทำอย่างไรครับ

7
มีหลักเกณฑ์อะไรบ้างครับที่สร้าง ACCESS เพื่อใช้ในรุ่น 2010-2016 และรุ่นที่ใหม่กว่า
และใช้ได้ทั้ง Office 32 bit 64 bit โดยไม่มีปัญหา

8
ไฟล์เดิมรุ่น 2010 ไปเปิดรุ่นที่สูงกว่า
- มันจะฟ้องประมาณว่า ไม่สามารถอ่าน VBA เดิมได้ ต้องลบ VBA ก่อนจึงเปิดได้
- พอเปิดแล้ว คำสั่งที่เขียนด้วย VBA ทั้งในฟอร์ม รายงาน โมดูล หายหมดครับ
- จะแก้ไขอย่างไรครับ

9
ห้อง MS Access / สร้างสายงาน
« เมื่อ: 13 ส.ค. 61 , 21:33:04 »
ต้องการเขียนโปรแกรมสำหรับสร้างสายงานครับ
รูปที่ 1 ในช่องผู้แนะนำถ้าเลือก กุลนิษฐ์   อุตสาหะ
จะไปเพิ่มข้อมูลในเรคคอร์ใหม่ในตารางตามรูป 2
โดยในคอลัม 1 , 2 , 3 และ 4 มีข้อมูลเหมือน กุลนิษฐ์   อุตสาหะ และ
เพิ่มชื่อ ชูเชิด  ศรีสวัสดิ์  ไปในคอลัมน์ต่อจาก กุลนิษฐ์ จะทำได้ไหมครับ



10
ห้อง MS Access / สร้างริบบอน ใช้เอง
« เมื่อ: 02 ส.ค. 61 , 14:15:52 »
สร้างริบบอนใช้เอง และต้องการใช้ control idMso ของ access ที่มีอยู่แล้วบ้าง แนะนำดูได้ที่ไหนครับ
เช่น "Undo" , "Redo" ,"RecordsDeleteRecord" ."FindDialog" ฯลฯ

11
อยู่ดี ๆ ก็ใช้ไม่ได้เฉยเลย เป็นตามรูปครับ
ลอง compile database ดูตรงที่ประกาศแบบนี้มีเออเร่อทุกทีครับ
dim dbs As Database

สาเหตุเกิดจากอะไร และแก้ไขอย่างไรครับ

12
เราพอจะรู้ได้อย่างไรครับว่า ตาราง ไปใช้เป็นข้อมูลที่ไหนบ้าง เช่น คิวรี่  ฟอร์ม  รายงาน หรือ กับตารางอื่น

13
พิมพ์ข้อความในคอมโบบ๊อกซ์ ปกติมันจะไล่ตัวอักษรให้เช่น พิมพว่า กิตติ มันเรียงเป็น
กิตติ
กิตติชัย
กิตติศักดิ์
แต่ตอนนี้มันไม่ไล่ตัวอักษรแบบนี้ให้ ต้องไปปรับตรงไหนครับ

14
ขอโค๊ตตรวจสอบ ฟอนต์ ในเครื่องมีหรือไม่ด้วย access ครับ

15
ห้อง MS Access / กำหนดขนาดกระดาษด้วย VB
« เมื่อ: 13 มิ.ย. 61 , 16:38:03 »
เราจะกำหนดขนาดกระดาษ และ ระยะขอบกระดาษด้วย VB อย่างไรครับ

16
1. ต้องการเขียนคำสั่งให้แอกเซสติดตั้งฟอนต์จากโฟลเดอร์ที่เรามี ลงไปในวินโดวส์ ต้องทำอย่างไรครับ
2. ต้องการตั้งค่า Region and Laguage ให้เป็น ฟอร์แมทภาษาไทย และ โลเกชั่นไทย ในแอกเซส ทำได้ไหมอย่างไร ครับ

หน้า: [1] 2