Dim p As New PrintDialog Dim cry As New cr '//อันนี้เป็น Crystal Report ที่ทำไวครับ cry.SetParameterValue("test", TextBox1.Text) cry.SetParameterValue("test2", TextBox2.Text) p.PrinterSettings.PrinterName = "Printer Name" '//อันนี้ชื่อ เครื่องปริ้นครับ p.AllowCurrentPage = True cry.PrintOptions.PaperSize = CrystalDecisions.Shared.PaperSize.DefaultPaperSize cry.PrintOptions.PaperSource = CrystalDecisions.Shared.PaperSource.Auto cry.PrintOptions.PrinterName = p.PrinterSettings.PrinterName cry.PrintToPrinter(p.PrinterSettings.Copies,p.PrinterSettings.Collate,p.PrinterSettings.FromPage, p.PrinterSettings.ToPage)
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง