Microsoft VBScript runtime (0x800A01AD)
ActiveX component can't create object: 'CDONTS.NewMail'
วินโดว์ที่ใช้อยู่ เป็น วินโดว์ xp ซึ่ง ผมได้ load CDONTS.dll มาแล้วและวางไว้ ใน C:\WINDOWS\system32 และทำการ Regiter แล้วโดยใช้คำสั่ง
REGSVR32 CDONTS.dll ที่ Start --> Run และตรวจสอบดูว่า service SMTP ทำการ Start แล้ว และได้ลองเปลี่ยน IP Address ที่ Default SMTP Virtual Server เป็นเครื่องที่เป็น Sever แล้ว
แต่ก็ยังมี Error นี้เกิดขึ้นอยู่ดี และ Code ที่ผมไช้อยู่ คือ
Dim objMail
Set objMail = CreateObject("CDONTS.NewMail")
ObjMail.Send "[email protected]", "[email protected]", "Subject", "This is the body."
Set objMail = Nothing