Hi
I делало страницой (using Dreamweaver - настолько отсутствие handcoding) те данные по вставок в доступ DB.
All мои новообращенные вставок даты от MM-DD-YYYY в DD-MM-YYYY.
Now - I фактическ want DD-MM-YYYY так, что будет почему я должен ввести по мере того как MM-DD-YYYY.
If я представляют 04-05-2010 я получает 05-04-2010.
If, котор я представляю 13-05-2010 я получаю Кодего вставки 13-05-2010.
The ниже (произведенное dreamweaver): class= " lineNumbers " >1 >
<%
Если (CStr, то (запрос («MM_insert»)) = «form1») после этого
Если (не MM_abortEdit) после этого
'исполните вставку
Затемните MM_editCmd
Установите MM_editCmd = Server.CreateObject («ADODB.Command»)
MM_editCmd.ActiveConnection = MM_ConnNews_STRING
MM_editCmd.CommandText = «ВСТАВКА В ЗНАЧЕНИЯ tblMenu (start_date, end_date, категории, navn, соединения, event_date, курса, меню) (? ? ? ? ? ? ? ?)»
MM_editCmd.Prepared = true
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param1», 135, 1, -1, DateValue (Request.Form («start_date»))) 'adDBTimeStamp
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param1», 135, 1, -1, DateValue (Request.Form («end_date»))) 'adDBTimeStamp
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param3», 202, 1, 255, Request.Form («категория»)) 'adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param4», 202, 1, 255, Request.Form («navn»)) 'adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param5», 202, 1, 255, Request.Form («соединение»)) 'adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param1», 135, 1, -1, DateValue (Request.Form («event_date»))) 'adDBTimeStamp
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param7», 202, 1, 255, Request.Form («курс»)) 'adVarWChar
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter («param8», 203, 1, 536870910, Request.Form («меню»)) 'adLongVarWChar
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close
'приложите шнур вопроса к URL перенаправлять
Затемните MM_editRedirectUrl
MM_editRedirectUrl = «tak.asp»
Если ("" <> Request.QueryString) после этого
Если (InStr, то (1, MM_editRedirectUrl, «? », vbTextCompare) = 0) после этого
MM_editRedirectUrl = MM_editRedirectUrl & «?» & Request.QueryString
Еще
MM_editRedirectUrl = MM_editRedirectUrl & «&» & Request.QueryString
Закончитесь если
Закончитесь если
Response.Redirect (MM_editRedirectUrl)
Закончитесь если
Закончитесь если
часть >
The class= %> |
When, котор DB доступа я раскрываю вверх по базе данных от дат доступа вписанных как 04-05-2010 остаток по мере того как 04-05-2010.
The выбирают Кодего показывает дату показано: class= " lineNumbers " >1 >
«ОТБОРНОЕ удостоверение личности, курс, event_date, фиксация времени ОТ tblMenu ГДЕ категория = class= " ясное " >
|
= event_date () -
class=
|
