private void button1_Click(object sender, EventArgs e) { ParameterFields pfs = new ParameterFields(); ParameterField pf = new ParameterField(); ParameterDiscreteValue pdv1 = new ParameterDiscreteValue(); ParameterDiscreteValue pdv2 = new ParameterDiscreteValue(); if (textBox1.Text == "" && textBox1.Text != Text) { MessageBox.Show("กรุณากรอกรหัสไปรษณีย์", "ผลการตรวจสอบ", MessageBoxButtons.OK, MessageBoxIcon.Information); textBox1.Focus(); return; } string connectionString = "Data Source=(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=localhost)(PORT=1521)))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=ross)));User Id=nan;Password=password;"; OracleConnection oConn = new OracleConnection(connectionString); oConn.Open(); if (oConn.State == ConnectionState.Open) { pf.ParameterFieldName = "Currentcode"; pdv1.Value = textBox1.Text; pf.CurrentValues.Add(pdv1); pfs.Add(pf); crvDisplay.ParameterFieldInfo = pfs; crvDisplay.ReportSource = new test3(); crvDisplay.Refresh(); return; } }
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim TL As TableLogOnInfo = Report1.Database.Tables(0).LogOnInfo TL.ConnectionInfo.ServerName = "ITSERVER\SQL2008" // ชื่อserver TL.ConnectionInfo.DatabaseName = "BaseEvent" //ชื่อฐานข้อมูล TL.ConnectionInfo.UserID = "sa" // username TL.ConnectionInfo.Password = "sql2008" //password Report1.Database.Tables(0).ApplyLogOnInfo(TL) Report1.Refresh() CrystalReportViewer1.ReportSource = Report1 End Sub
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
