Dim form_newlog As New f_newlog form_newlog.MdiParent = Me form_newlog.Show()
cr.Load(str_reppath) cr.SetParameterValue("outletname", f_newlog.cmbOutlet.Text) cr.SetParameterValue("log_no", f_newlog.lbl_logno.Text) cr.SetParameterValue("jobdetail", f_newlog.txtjobdetail.Text) CrystalReportViewer1.ReportSource = cr CrystalReportViewer1.Refresh()
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง