張貼日期:Mar 09, 2010 7:26:0 AM
If NOT IsEmpty(Request.Form("submit")) Then
'修改資料
SQLString = " UPDATE tb_photo_class SET c_title = " & fixData(Request.Form("c_title"), "S") & ", c_sort = " & fixData(Request.Form("c_sort"), "N") & _
" WHERE c_id = " & fixData(Request.Form("c_id"), "N")
Set mySQLCommand = Server.CreateObject("ADODB.Command")
mySQLCommand.ActiveConnection = myConnString
mySQLCommand.CommandText = SQLString
mySQLCommand.Execute
mySQLCommand.ActiveConnection.Close
Set mySQLCommand =Nothing
End If