Grazie Vincent, ma avevo già provato e risultati nulli. Comunque questo è il codice che ho attualmente usato:
codice:
If (CStr(Request("compila")) = "1") Then
Nome = replace(request.Form("Torneo"),"'","''")
DataStart = request.Form("DataStartTorneo")
GiornoStart = Mid(DataStart, 9, 2)
MeseStart = Mid(DataStart, 6, 2)
AnnoStart = Mid(DataStart, 1, 4)
DataStart1 = MeseStart&"/"&GiornoStart&"/"&AnnoStart
DataStop = request.Form("DataStopTorneo")
GiornoStop = Mid(DataStop, 9, 2)
MeseStop = Mid(DataStop, 6, 2)
AnnoStop = Mid(DataStop, 1, 4)
DataStop1 = MeseStop&"/"&GiornoStop&"/"&AnnoStop
if (RsTornei.eof or RsTornei.bof) then
Set cn1 = Server.CreateObject("ADODB.Connection")
cn1.Open strConn
GiorniTorneo = datediff("d", DataStart, DataStop)
for x = 0 to GiorniTorneo
sql = "INSERT INTO "&TabAttuale&"( Nome, Data, Occupato) " &_
"VALUES ( '" & Nome & "',#" & DataStart1 & "#,1)"
cn1.Execute sql
DataStart1 = dateadd("d", 1, DataStart1)
next
end if
response.Redirect("crea_torneo.asp?m="&GiorniTorneo)
end if
Come vedi formatto la datastart1 mm/gg/aaaa ma quando inserisco i record nella tabella, finchè si tratta di date con il giorno minore o uguale a 12 li inserisce con mm/gg/aaaa, mentre dal 13 del mese in poi le mette come gg/mm/aaaa. Vedi sotto. Come faresti te?
Data |
04/04/2017 |
04/05/2017 |
04/06/2017 |
04/07/2017 |
04/08/2017 |
04/09/2017 |
04/10/2017 |
04/11/2017 |
04/12/2017 |
13/04/2017 |
14/04/2017 |
15/04/2017 |
16/04/2017 |
17/04/2017 |
18/04/2017 |
19/04/2017 |
20/04/2017 |