แสดงกระทู้

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

20
ผมทำการ 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

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

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

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

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

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



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

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

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

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

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

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

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

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

33
ใช้มาโครในการเลื่อนระเบียนใหม่ หรือ ขึ้นระเบียนใหม่
จะมีข้อความเตือนว่า "คีย์หลักไม่สามารถมีค่า Null ได้"
และ คราวนี้ก็ย้อนกลับ ไประเบียนก่อนหน้าไม่ได้ แอกเซสไม่ยอม
เราจะแก้ไขได้อย่างไร ครับ

34
เปิดไฟล์ access ที่สร้างใหม่ครั้งแรก จะไม่ให้มีการเตือน ต้องเขียนโค๊ตอย่างไร และไปวางไว้ตรงไหนครับ

35
ต้องการออกแบบโปรแกรมดังนี้ครับ
1. เลือกไฟล์ ที่ต้องการ
2. เปลี่ยนชื่อไฟล์ ตามที่เรากำหนด โดยใช้ชื่อไฟล์เป็น ปปดดวว (ปี เดือน วัน)
3. copy ไฟล์นั้นแล้วนำไปลงไว้ที่ โฟลเดอร์ D:\iDoc
พอจะทำอย่างไรได้บ้างใน access ครับ

36
ห้อง MS Access / พิมพ์ออกเป็นไฟล์ PDF
« เมื่อ: 11 พ.ค. 61 , 10:01:37 »
มีรายงานอยู่ 13 หน้า (13 report)  เราจะสามารถสั่งพิมพ์ออกเป็นไฟล์ PDF ที่เดียวกัน 13 หน้า ได้ไหมครับ

หน้า: 1 [2] 3