Pytanie : Save rejestr inny stół przed the dokumentacyjny…

Cześć guys.

I mieć niektóre kłopot z mój MySQL kod. Przed rejestr od stół "tbl_oae_1", I chcieć save ten rejestr w inny stół "tbl_oae_1_log", i inny wartość musieć the słowo "KASOWAĆ". I utrzymywać składnia błąd… I przyznawać ono patrzeć nieco upaćkany, więc właśnie iść naprzód i mieć śmiech. ; -) Tutaj być mój kod (lub próba):

Dim xusername, xpatient_id_oae1, xspecify1, xoae1_grade
xoae1_id = Request.Form ("MM_recordId " )
sConnString = MM_conn_STRING
Ustalony objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open (sConnString)
sSQL =" (WYBRANY username JAKO xusername, patient_id_oae1 JAKO xpatient_id_oae1, specify1 JAKO xspecify1, oae1_grade JAKO xoae1_grade OD tbl_oae_1 DOKĄD oae1_id = [MM_recordId]) "
sSQL1 = "WSZYWKA W tbl_oae_1_log (username, patient_id_oae1, specify1, oae1_grade) WARTOŚĆ (CONCAT ("" & xusername & "", "KASOWAĆ "), CONCAT ("" & xpatient_id_oae1 & "", " KASOWAĆ "), CONCAT ("" & xspecify1 & "", "KASOWAĆ "), CONCAT ("" & xoae1_grade & "", "KASOWAĆ ")) "
sSQL2 = "DELEATUR OD tbl_oae_1 DOKĄD oae1_id = "" & xoae1_id & "" "
response.write sSQL
response.write sSQL1
response.write sSQL2
objConn.execute (sSQL)
objConn.execute (sSQL1)
objConn.execute (sSQL2)
Jeżeli err.number=0 Then
response.write "the dane kasować pomyślnie. "
Końcówka If
objConn.Close
Ustalony objConn = nothing

I am using klasyk asp mieszać z JavaScript i vb.

Best regards

Ullenulle

Odpowiedź : Save rejestr inny stół przed the dokumentacyjny…

Próbować to
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:

xoae1_id = zamieniać (Request.Form ("MM_recordId")," '"," '' ")
sConnString = MM_conn_STRING
Ustalony objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open (sConnString) 
sSQL = "(WYBRANY username JAKO xusername, patient_id_oae1 JAKO xpatient_id_oae1, specify1 JAKO xspecify1, oae1_grade JAKO xoae1_grade OD tbl_oae_1 DOKĄD oae1_id = "" & xoae1_id & "" "
response.write sSQL
Set rs=objConn.execute (sSQL)
jeśli nie rs.eof wtedy
  sSQL1 = "WSZYWKA W tbl_oae_1_log (username, patient_id_oae1, specify1, oae1_grade) WARTOŚĆ (CONCAT ("" & zamieniać (rs ("xusername"),"" "," '' ") &" "," DELETED'), CONCAT (""& zamieniać (rs ("xpatient_id_oae1"),"" "," '' ") &" "," DELETED'), CONCAT (""& zamieniać (rs ("xspecify1"),"" "," '' ") &" "," DELETED'), CONCAT (""& zamieniać (rs ("xoae1_grade"),"" ","'' ") &" "," DELETED')) "
  response.write sSQL1
  objConn.execute (sSQL1)
  sSQL2 = "DELEATUR OD tbl_oae_1 DOKĄD oae1_id = "" & xoae1_id & "" "
  response.write sSQL2
  objConn.execute (sSQL2)
kończyć jeżeli
Jeżeli err.number=0 Wtedy
response.write "the dane kasować pomyślnie."
Kończyć Jeżeli
objConn.Close
Ustawiać objConn = nic
Inne rozwiązania  
 
programming4us programming4us