Dim objConn As New OleDbConnection Dim objCmd As New OleDbCommand Dim dtReader As OleDbDataReader Dim strConnString,strSQL As String strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\database\\mydatabase.mdb;Jet OLEDB:Database Password=;" objConn.ConnectionString = strConnString objConn.Open() strSQL = "UPDATE customer SET " & _ " CustomerID = '"& Me.txtCustomerID.Text &"' " & _ " ,Name = '"& Me.txtName.Text &"' " & _ " ,Email = '"& Me.txtEmail.Text &"' " & _ " ,CountryCode = '"& Me.txtCountryCode.Text &"' " & _ " ,Budget = '"& Me.txtBudget.Text &"' " & _ " ,Used = '"& Me.txtUsed.Text &"' " & _ " WHERE CustomerID = '" & Request.QueryString("CustomerID") & "' " objCmd = New OleDbCommand With objCmd .Connection = objConn .CommandText = strSQL .CommandType = CommandType.Text End With
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง