แสดงกระทู้

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 - prajak

หน้า: [1] 2 3 4
1
รบกวนสอบถามพี่ๆหน่อยนะครับ คือว่าผมมี1 query ที่มีฟิวด์ตามรูป ต้องการสร้างฟิวด์ชื่อ GenOrder ขึ้นมา โดยให้ดูที่ฟิวด์ order_no หากมีเลขorderที่เหมือนกัน ให้ฟิวด์ GenOrder แสดงเลข order มาแค่1 ตัว ส่วนบรรทัดถัดไปก็ปล่อยว่างไว้ตามรูป ต้องเขียนสูตรหรือคำสั่งยังไงครับ


2
ห้อง MS Access / สอบถามการปิดเมนูบาร์
« เมื่อ: 27 พ.ค. 64 , 14:20:29 »
ผมใช้คำสั่งเพื่อปิดเนูบาร์ตอนเปิดฟอร์มตามนี้ครับ
Private Sub Form_Open(Cancel As Integer)
If SysCmd(acSysCmdAccessVer) > 11 Then
        DoCmd.ShowToolbar "Ribbon", acToolbarNo
        Else
        DoCmd.ShowToolbar "Menu Bar", acToolbarNo
    End If
   
End Sub

หากผมต้องการให้เหลือไว้เฉพาะปุ่ม undo กับ Redo ตามรูป สามารถทำได้หรือเปล่าครับ ขอบคุณครับ



3
ตามรูปส่วนที่สีเหลืองต้องเขียนยังไงครับหากผมต้องการหาผลรวมของฟิวด์ TotalAmount ของคิวรี่ QProBudget2 โดยมีเงื่อนไขว่า ถ้าค่าในฟิวด์ BUYER = Customer_Name ของคิวรี่ Qbudget2

ปล.ฟิวด์ BUYER กับ Customer_Name เป็นแบบ text ครับ


4
รบกวนสอบถามครับ ถ้าในคิวรี่มี่2ฟิวด์คือ ฟิวด์A กับฟิวด์B
ต้องการให้ที่ฟิวด์B = ฟิวด์A ลบ(-) ฟิวด์Aของrecordก่อนหน้า ต้องใช้สูตรยังไงครับ

5
ห้อง MS Access / สอบถามคำสั่ง Docmd.Movesize
« เมื่อ: 10 ม.ค. 62 , 10:55:54 »
รบกวนสอบถามการสั่งให้ฟอร์มอีก1ฟอร์มไปแสดงผลอีกจออัตโนมัติโดยใช้คำสั่ง movesize ครับ
คือผมมีPC1ตัว ต่อออก2จอโดยตั้งเป็นแบบ Extend โดยที่
จอที่1(primary) 21.5" resolution 1920x1080 ต่อผ่านสาย DVI
จอที่2(secondary) 19.5" resolution 1600x900 ต่อผ่านสาย VGA

ที่โปรแกรม Access มี2ฟอร์ม
ฟอร์มที่1 ชื่อฟอร์ม FrmDbLine1_Eng1 ที่ On open ใส่ Call OpenBClient() เพื่อเรียกคำสั่ง Movesize ที่วางไว้ใน Module
ฟอร์มที่2 ชื่อฟอร์ม FrmDbLine2_Eng1 (คือฟอร์มที่ต้องการให้ออกจอ2)

ที่ Module ชื่อ Monitor ใส่ Code ดังนี้
Option Compare Database

Option Explicit

Public clnClient As New Collection

Function OpenBClient()
 
    Dim frm As Form
   
    Set frm = New Form_FrmDbLine2_Eng1
     frm.Visible = True
    frm.Caption = frm.hWnd & ", Opened " & Now()
   
   
    clnClient.Add item:=frm, Key:=CStr(frm.hWnd)
    DoCmd.MoveSize 20000, 0, 0, 0
    DoCmd.Maximize
     
    Set frm = Nothing
End Function

ผลคือฟอร์มที่2 FrmDbLine2_Eng1 ไม่ออกจอ2ครับ ไม่ทราบว่า ตรงcode movesize ต้องเป็นค่าเท่าไหร่ครับ

6
ห้อง MS Access / การใช้คำสั่ง iifซ้อน iif
« เมื่อ: 08 ธ.ค. 61 , 08:59:05 »
ผมรบกวนสอบถามหน่อยนะครับ มีคำสั่งอื่นแทนการใช้ iif ซ้อนไหมครับ ผมใช้ iif ใน expression แต่พอใช้ซ้อนหลายๆชั้นมันเหมือนเกินขีดจำกัด และขึ้น error ครับ พอจะมีคำสั่งอื่นใช้แทนหรือเปล่าครับ


Eff20Auto: IIf(Not IsNull([Eff20]),[Eff20],IIf(Not IsNull([Eff19]),[Eff19],IIf(Not IsNull([Eff18]),[Eff18],IIf(Not IsNull([Eff17]),[Eff17],IIf(Not IsNull([Eff16]),[Eff16],IIf(Not IsNull([Eff15]),[Eff15],IIf(Not IsNull([Eff14]),[Eff14],IIf(Not IsNull([Eff12]),[Eff12],IIf(Not IsNull([Eff11]),[Eff11],IIf(Not IsNull([Eff10]),[Eff10],IIf(Not IsNull([Eff9]),[Eff9],[%Efficiancy])))))))))))

7
คือรบกวนสอบครับ ผมสร้างฟอร์มแต่ต้องการให้เวลาไปเปิดกับจอขนาดอื่่น ให้มันแสดงผลพอดีกับหน้าจอ ต้องทำไงครับ

8
รบกวนสอบถามอาจารย์ทุกท่านนะครับ ผมมีข้อมูลที่ได้จากการ query ประมาณไม่น่าเกิน4record ต้องการให้แสดงบนฟอร์มทีละ1record โดยแสดงสลับกันไปแบบวนloop ไปเรื่อยๆต้องทำอย่างไรครับ ปัจจุบันใช้วิธีตามรูป แต่รู้สึกว่าบางครั้งมันจะแสดงซ้ำๆrecordเดิมหลายครั้งแล้วค่อยจะวนloopครับ


9
สอบถามนะครับ เราสามารถกำหนดให้ user แต่ละสิทธิพอloginเข้าแล้วให้เปิดฟอร์มของตัวเองตามที่กำหนดได้หรือเปล่าครับ
เช่นการตลาด loginแล้วเข้าฟอร์มการตลาด
จัดซื้อ login แล้วเข้าฟอร์มจัดซื้อ
ซึ่งปัจจุบันผมใช้การกำหนดสิทธิที่ปุ่มเมนูแทน โดยการ Enable=false เป็นต้น

10


ที่ฟิวด์ TotalOutput ในกรณีที่เลขที่ BOM เดียวกัน ให้นำ OutputPerDay ไปรวมกับ Record ก่อนหน้าได้ยังไงอะครับ


11
ตามรูปผมจะมี2ฟอร์ม
ฟอร์ม1 สำหรับป้อนข้อมูล
ฟอร์ม2 สำหรับแสดงผล เปิดformนี้ไว้ตลอด (ให้แสดงหน้าไลน์ผลิต)
database อยู่ที่เครื่อง Server
ต้องการให้คีย์ข้อมูลที่ฟอร์ม1 เช่น เป้าหมายต่อชั่วโมง แล้วให้ไปแสดงที่ฟอร์ม2 ที่เปิดฟอร์มทิ้งไว้อีกเครื่องหนึ่งทันที จะต้องทำยังไงครับ ซึ่งตอนนี้ที่ฟอร์มแสดงผลที่เปิดทิ้งไว้ก็เปลี่ยนนะครับ แต่จะนานประมาณ1นาทีหลังจากคีย์ข้อมูล( จะตั้งให้ form 2 refreshบ่อยๆก็กลัวเครื่องจะทำงานหนักเกินไป ไม่รู้ผมเข้าใจถูกหรือเปล่า)

form1 (สำหรับป้อนข้อมูล)


form2 (แสดงผลต้องเปิดทิ้งไว้ตลอด)


12
ห้อง MS Access / รบกวนสอบถาม Query error ครับ
« เมื่อ: 11 ต.ค. 61 , 08:58:12 »
ผมเรียกquery ซึ่งมี record ประมาณสี่หมื่นกว่าrecord แล้วมันขึ้นerrorตามรูปครับ (database ตั้งเป็นแบบ link table) ไม่รู้ว่ามันมี record เยอะหรือเปล่าทำให้เรียกขึ้นมาช้าเลยทำให้ error ซึ่งในอนาคตคิดว่า record มันต้องเยอะขึ้นกว่านี้อีกมาก หรือ queryนี้มันมาจากหลายๆquery ครับ
**แต่ผมลองตั้งค่า databaseเป็นแบบ local table จะไม่ขึ้น error ครับ แต่จะช้าหน่อยแค่นั้นเอง





13


รบกวนสอบถามตามรูปครับ ผมมีข้อมูลตามตารางด้านบน อยากให้ออกรายงานตามรูปตารางรางด้านล่างจะทำยังไงครับ คือให้ดึงข้อมูลปีมา และเอายอดของปีเดียวกัน เดือนเดียวกัน มารวมกันครับ

14
รบกวนช่วยบอกสูตรการ sum ค่าตัวเลขจาก Query ที่กรองแล้วหน่อยครับ เนื่องจากผมต้องการนำตัวเลขนั้นไปเข้าสูตรอื่นต่อครับ ส่วน Dsum เข้าใจว่าน่าจะเป็นการรวมค่าทั้งหมดของฟิวด์นั้นครับไม่น่าจะใช้ได้ เพราะผมต้องการแค่ยอดรวมเฉพาะที่เรากรองจาก Query แล้วเท่านั้น

15
ตามรูปผมต้องการหา%ของฟิวด์QtyFของแต่ละรายการ ไม่ทราบว่าต้องใช้สูตรไหนครับ


16
ในหนึ่งPOสั้งซื้อจะต้องใช้กับหลายStyle ผมก็เลยกำหนดให้ User ป้อนชื่อstyle ในช่องหมายเหตุ โดยมีกี่style ก็ใส่ไปเลย(อาจมีถึง10 style) ตามรูป


สิ่งที่ผมต้องการคือที่หน้าสรุปรายการ(ดึงมาจากหน้าPO) ผมจะสามารถค้นหาแต่ละ style จากcombo box ได้หรือไม่ครับ เพราะมันจะแสดงแค่บันทัดแรกอย่างเดียว
รบกวนด้วยนะครับ

หน้า: [1] 2 3 4