1
ห้อง MS Access / : Error MSOUTL.OLB รุ่น 9.5. เปิดด้วย Access Runtime2007
« เมื่อ: 01 ธ.ค. 63 , 13:41:18 »
แปปนะครับ ผมลองทดสอบแปป
โพสต์นี้ได้รับคำขอบคุณจาก: paitoon
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.
Dim olApp As Object
Dim olMail As Object
Const olMailItem As Long = 0
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(olMailItem)
olMail.To = Me.mail
olMail.Subject = "เอกสารเข้าออกพื้นที่"
olEmail.Attachments.Add "C:\CJ\" & FileName & ".pdf"
olMail.Body = "Body ของ Email"
If Not IsNull(olEmail.To) And Not IsNull(olEmail.SUBJECT) And Not IsNull(olEmail.Body) Then
olEmail.Send
Else
End If
MsgBox ("บันทึกเรียบร้อยแล้ว"), vbInformation
[url = "ที่อยู่เว็บ"] ข้อความหรือชื่อเว็บที่ต้องการให้แสดงออกมา [/url]
[url=https://www.thai-access.com/index.php] บอร์ดเรียนรู้ Access สำหรับคนไทย [/url]
https://medium.com/linedevth/%E0%B9%84%E0%B8%A1%E0%B9%88%E0%B8%9E%E0%B8%A5%E0%B8%B2%E0%B8%94%E0%B8%97%E0%B8%B8%E0%B8%81%E0%B8%81%E0%B8%B2%E0%B8%A3%E0%B8%AA%E0%B8%B7%E0%B9%88%E0%B8%AD%E0%B8%AA%E0%B8%B2%E0%B8%A3%E0%B8%81%E0%B8%B1%E0%B8%9A%E0%B8%9C%E0%B8%B9%E0%B9%89%E0%B9%83%E0%B8%8A%E0%B9%89%E0%B8%9A%E0%B8%A3%E0%B8%B4%E0%B8%81%E0%B8%B2%E0%B8%A3%E0%B8%82%E0%B8%AD%E0%B8%87%E0%B8%84%E0%B8%B8%E0%B8%93-%E0%B8%94%E0%B9%89%E0%B8%A7%E0%B8%A2%E0%B8%A3%E0%B8%B0%E0%B8%9A%E0%B8%9A%E0%B9%81%E0%B8%88%E0%B9%89%E0%B8%87%E0%B9%80%E0%B8%95%E0%B8%B7%E0%B8%AD%E0%B8%99%E0%B8%9C%E0%B9%88%E0%B8%B2%E0%B8%99-line-notify-a4f8c41cf633
2 ที่บริเวณขวาบน หรือขวาล่างของหน้ากระทู้จะมีปุ่ม | ตอบกระทู้ | กดเข้าไป --> พิมพ์ข้อความใส่เนื้อหาตามที่ต้องการ(หน้าต่างและวิธีการจะเหมือนตอนตั้งกระทู้ใหม่) |
3 | ตั้งกระทู้ | แสดงตัวอย่าง |
ปล.ล่างสุดของหน้ากระทู้นั้นๆจะมีกล่อง ตอบด่วน อยู่ / นั้นคือสามารถพิมพ์ข้อความแล้วคลิกที่ | ตั้งกระทู้ | เพื่อเป็นการโพสต์ตอบแบบเรียบง่ายฉับไวได้เลย |
ห้อง MS Access | "เรื่องอื่นๆ"เกี่ยวกับ Access | ห้องสนทนาทั่วไป |
|