<% ConnectionString = "Provider=SQLOLEDB;Data Source=sql60.enterhost.com;Initial Catalog=BA321;user ID=BA321;password=walkerhilladm90 ;" Set GetDBConn = Server.CreateObject("ADODB.Connection") GetDBConn.Open(ConnectionString) Set List = Server.CreateObject("ADODB.Recordset") List.Open "SELECT * FROM E_Ticket ORDER BY idx ASC", GetDBConn, 1 ListCount = List.RecordCount %>

Àüü¼±ÅÃ(Ctrl+A)ÇÏ½Ã°í º¹»çÇÏ¿© ¸Þ¸ðÀå¿¡ ºÙÇô³Ö±â ÇϽðųª ÀúÀåÇϱâ¹öÆ°À» Ŭ¸¯ÇÏ¿© ÅؽºÆ®ÆÄÀÏ·Î ÀúÀåÇϽñ⠹ٶø´Ï´Ù.

<% For i=1 To ListCount SQL=SQL & "UPDATE E_Ticket SET " SQL=SQL & "departure_country='" & List("departure_country") & "'," SQL=SQL & "departure_airport='" & List("departure_airport") & "'," SQL=SQL & "arrival_country='" & List("arrival_country") & "'," SQL=SQL & "arrival_airport='" & List("arrival_airport") & "'," SQL=SQL & "start_date='" & List("start_date") & "'," SQL=SQL & "end_date='" & List("end_date") & "'," SQL=SQL & "airline='" & List("airline") & "'," SQL=SQL & "airline_card='" & List("airline_card") & "'," SQL=SQL & "ticket_type1='" & List("ticket_type1") & "'," SQL=SQL & "ticket_type2='" & List("ticket_type2") & "'," SQL=SQL & "adult='" & List("adult") & "'," SQL=SQL & "baby='" & List("baby") & "'," SQL=SQL & "kid='" & List("kid") & "'," SQL=SQL & "passenger='" & List("passenger") & "'," SQL=SQL & "seat_type='" & List("seat_type") & "'," SQL=SQL & "buyer='" & List("buyer") & "'," SQL=SQL & "email='" & List("email") & "'," SQL=SQL & "tel='" & List("tel") & "'," SQL=SQL & "description='" & List("description") & "'," SQL=SQL & "insert_date='" & List("insert_date") & "'," SQL=SQL & "status='" & List("status") & "'," SQL=SQL & "response_msg='" & List("response_msg") & "'" SQL=SQL & " where idx =" & List("idx") SQL = SQL & Chr(10) List.MoveNext Next %> <%=SQL%> <% For j=1 To 15 %> <% Next %>