แสดงกระทู้

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.


Messages - kunlek

หน้า: 1 2 [3] 4 5 6 ... 13
37
ถ้ามีตัวเลขใน field เป็น 12/63 ต้องการให้แสดงผลเป็น ธันวาคม ุ63 เขียนฟังก์ชั่นแบบไหนครับ

38
ต้องการโอนข้อมูล ตาราง Voucher_s กับ Voucher_s1 และ Fsale กับ Fsale1  ถ้าใส่ code นี้ จะโอนไปเฉพาะตาราง Fsale แต่ถ้าโอนทีละตารางโอนได้ครับ ขอคำแนะนำครับท่าน.....

Private Sub Command0_DblClick(Cancel As Integer)
Dim strSQL As String
strSQL = "INSERT INTO voucher_s  SELECT voucher_s1.* FROM voucher_s1 WHERE (((voucher_s1.voucher_s_id)=[เลขที่บิล]));"
strSQL = "INSERT INTO fsale  SELECT fsale1.* FROM fsale1 WHERE (((fsale1.voucher_s_id)=[เลขที่บิล]));"
DoCmd.SetWarnings False
DoCmd.RunSQL strSQL
DoCmd.SetWarnings True
End Sub

39
runtime error '3070'
The Microsoft Access database engine does not recognize'voucher_s.*' as a valid field name or expression

40
Private Sub Command0_DblClick(Cancel As Integer)
Dim strSQL As String
strSQL = "INSERT INTO voucher_s1 SELECT voucher_s.* FROM WHERE (((voucher_s1.voucher_s_id)=[ãÊèàÅ¢·ÕèºÔÅ]));"
DoCmd.SetWarnings False
DoCmd.RunSQL strSQL
DoCmd.SetWarnings True
End Sub


***ทำไม ติด debug ครับ

41
เนื่องจาก table A และ Table B อยู่คนละ file.mdb ครับ 
ถ้า Table B เป็น table ที่อยู่ d:\MM.mdb  เราจะอ้างอิงเขียนตรง INSERT INTO table b จะเขียนได้อย่างไรครับ

42
มีตาราง A และตาราง ฺB เหมือนกัน แต่ตาราง B ขาดรายการบิลที่ป้อนในเดือนมีนาคม 63(date_sale) ทั้งเดือน เราจะใช้ query แบบ append ได้ไหมครับ และ criteria จะระบุช่วงเดือนอย่างไร?

43
ผมใช้ combo box อยู่แล้วครับ แต่เวลาค้นหาโชว์ทุก record ใช้งานจริง ไม่ต้องการให้โชว์  record INV ต้องการให้โชว์เฉพาะเรคคอร์ด PSV...และ PAA...

44
ถ้าบิลที่อยู่ใน list ค้นหา ประกอบด้วย IV163-08-01-01 .... และ PAA163-08-02-01..... และ PSV163-08-13-01....  แต่เราต้องการให้ใน list โชว์เฉพาะ PSV....กับ PAA  ครับ  ผมจะเขียนอย่างไรครับ

45
[ENTER Bill Group] คืออะไรครับ  เอามาจากไหนครับ?

46
SELECT [voucher_b].[voucher_b_id], [voucher_b].[date_buy] FROM [voucher_b] where (([voucher_b].[voucher_b_id] like "PAA*"))
ค้นบิลที่ขึ้นต้นด้วย PAAปป-ดด-วว-xx  และถ้าต้องค้นบิลขึ้นต้นด้วย  PCปป-ดด-วว-xx หลัง where จะเขียนอย่างไรครับ

47
แก้ตามที่ท่านแนะนำก็ได้ผลลัพธ์ตามต้องการ  แต่รายการเครื่องดูดฝุ่น hitachi ทำไมยังผิดอยู่ครับ จริง ๅ 106.85+4893.15=5000  แต่ทำไม= 5001.74  (เครื่องดูดฝุ่น อายุใช้งาน 5 ปี ครับในงวดปี 62 ค่าเสื่อมในงวดจึง =106.85+4893.15  ผิดกับรายการอื่น ที่อายุการใช้งานเกินงวด 62 เช่น คอมพิวเตอร์ทั้งชุด  จึงมีค่า =1000+3484.93 ซึ่งถูกต้องแล้ว)
เรียน อจ ช่วยพิจาณาหาสาเหตุทีครับ  ขอบพระคุณอย่างสูงจริงๆๆครับ 

48
ตัวอย่างครับ ประกอบกระทู้

49
ห้อง MS Access / : รวมตัวเลขไม่ได้
« เมื่อ: 29 ก.ค. 63 , 19:49:57 »
มูลค่าต้นงวด: Format(CDec(([book_vul]-[ค่าเสื่อมต้นงวด]),"0.00"))  ทำไมได้ผลลัพธ์ " 0" ทั้งหมด ครับ

50
ตัวแปร
ค่าเสื่อมสะสม=IIf([status]=-1,0,IIf(([limit_date]<[end_date]),([ค่าเสื่อมต้นงวด]+[ค่าเสื่อมงวดนี้]-1),([ค่าเสื่อมต้นงวด]+[ค่าเสื่อมงวดนี้])))
status   (-1   =ทรัพย์สินอยู่ระหว่างก่อสร้าง  0  =ทรัพย์สินเสร็จ  พร้อมใช้งาน)
limit_date  วันที่หมดอายุการใช้งาน(นับจากวันที่ซื้อ +อายุการใช้งานทรัพย์ ในตัวอย่าง 5 ปี)
end_date  วันที่ออกรายงาน(ในที่นี้ คือ 31/12/62)
ในเงือนไข 
    1 ถ้าทรัพย์สินยังอยู่ระหว่างก่อสร้าง ทรัพย์สินรายการนั้นจะคงมูลค่าไว้ จนกว่าสร้างเสร็จ
      ในรายงาน จึงมีค่า " 0 "
    2 มี 3 เงื่อนไข  คือ  ค่าเสื่อมในงวด หามากจาก (ถ้าทรัพย์สินหมดอายุใช้งานในงวด ค่าเสื่อมในงวด เท่ากับ
        วันในงวด คูณ ค่าเสื่อมทรัพย์สินต่อวัน(depree_day) แต่ถ้าคำนวณแล้ว ได้มากกว่า มูลค่า
        ทรัพย์สินคงเหลือยกมา น้อยกว่า  ให้ใช้มูลค่าทรัพย์สินคงเหลือ
         แต่ถ้าทรัพย์สินใด  หมดอายุตั้งแต่  งวดก่อน  ค่าเสื่อมในงวดจะเท่ากับ "0"
    3 ถ้าทรัพย์สินใดหมดอายุการใช้งาน ให้คงมูลค่าทรัพย์สินไว้ " 1 "  และค่าเสื่อมสะสมทั้งหมดจะถูกหัก "1"
       ทรัพย์สินอื่นที่ยังมีอายุการใช้ในงวดรายงาน  หรือรายงานงวดต่อๆๆไป  ค่าเสื่อมในงวดคำนวณตามปกติ
       สิ่งที่ส่งมาในกระทู้ ยังผิดตรงที่ว่า ค่าเสื่อมสะสมของทรัพย์สินถูกหัก "1" ทุกรายการ ซึ่งรายการที่ยังมีอายุ
     การใช้งานจึง " ผิด "

51
ห้อง MS Access / : รวมตัวเลขไม่ได้
« เมื่อ: 29 ก.ค. 63 , 17:27:03 »
ผมใช้ Round ผลลัพธ์ไม่ถูกทั้งหมด อย่างที่ท่านว่า  ก็นึกว่าเป็นเรื่องทศนิยมยาวไป ตัดเหลือ 2 ตำแหน่ง   คงต้องไปแก้เป็น CDec(format(n,"0.00"))  แล้วคงแก้ type field table   เพราะใช้ number/double  กำหนด format/decimal  เป็น standard/decimal มาตลอด  ขอบพระคุณมากครับ

52

รายงานค่าเสื่อม ณ 31/12/62
1 ค่าเสื่อมสะสม  ถ้าทรัพย์สินไหนตัดค่าเสื่อมครบแล้ว จะคงมูลค่าปลายงวด ไว้ "1" และค่าเสื่อมสะสมจะหักออก "1"
2 ค่าเสื่อมสะสม เป็นทรัพย์สินที่ยังมีอายุการใช้งาน เกิน 31/12/62 มูลค่าปลายงวด ยังไม่ต้องสำรองไว้ 1  และค่าเสื่อมสะสมก็ไม่ต้องหัก 1

53
ตอบกระทู้ตัวเอง ได้ข้อคิดจากเวปบอร์ดนี้ครับ แก้ปัญหาที่ติดคือ ใช้ ฟังก์ชั่น  Round([x],2) 

54
จากกระทู้ที่แล้ว ที่มาของตัวเลข
 มูลค่าต้นงวด: Nz([book_vul]-[ค่าเสื่อมต้นงวด])
ค่าเสื่อมต้นงวด: Nz(IIf([status]=0,IIf(([วันต้นงวด]-[term_day])>0,([book_vul]),([วันต้นงวด]*[depree_day])),"0"))
วันต้นงวด: DateDiff("d",[date_buy],[befor_end_date])-1
มูลค่าคงเหลือ  : Nz(IIf([book_vul]-([ค่าเสื่อมต้นงวด]+[ค่าเสื่อมงวดนี้])=0,1,([book_vul]-([ค่าเสื่อมต้นงวด]+[ค่าเสื่อมงวดนี้]))))
จะมีฟังก์ชั่นอะไรมาครอบตัวเลขของผลลัพธ์นี้ให้มีทศนิยม เหลือ 2 ตำแหน่งได้บ้างครับ

หน้า: 1 2 [3] 4 5 6 ... 13