175 messaggi dal 20 luglio 2002
www.subweb.it
HO un problema con una stringa SQL
in pratica non mi legge la stringa data_odierna
Se modifico pero la data di default con ultradev e provo a testare il recorset funziona correttamente, ovvero mi visualizza solo i messaggi che hanno data_fine maggiore dell impostazione di default

<%
function prepara_data(gg,mm,aaaa)
data_odierna= gg & mm & aaaa
response.write data_odierna
end function
call prepara_data(datePart("d",now()), datePart("m",now()), datePart("yyyy",now()))
%>
<%
Dim rsofferta__data_odierna
rsofferta__data_odierna = "24/01/2002"
if (data_odierna <> "") then rsofferta__data_odierna = data_odierna

set rsofferta = Server.CreateObject("ADODB.Recordset")
rsofferta.ActiveConnection = MM_conntosc_STRING
rsofferta.Source = "SELECT hotel.IDalbergo, hotel.tipologia, hotel.nomealbergo, promozioni.data_inizio, promozioni.data_fine, promozioni.promozione FROM promozioni, hotel WHERE hotel.IDalbergo=promozioni.IDpromozione AND ((promozioni.data_fine)>(#" + Replace(rsofferta__data_odierna, "'", "''") + "#))"
rsofferta.CursorType = 0
rsofferta.CursorLocation = 2
rsofferta.LockType = 3
rsofferta.Open()
rsofferta_numRows = 0
%>

Se imposto rsofferta__data_odierna ="24/10/2002" funziona correttamente!!!!
Allora perche non mi vuole prendere la data odierna che imposto all'inizio e che sicuramente non è uguale a "" eche mi stampa correttamente sul video???

IL DB e access2000

Secondo me è proprio il solito problema delle date che rompono!

subweb consulting
33 messaggi dal 06 settembre 2002
www.saintgeorge.it
Ciao!
Hai provato ad interrogare il DB passandogli le date nel formato americano (mm-gg-aaaa)?
Quando interrogo i DB per date io lo faccio sempre così. Ho avuto i tuoi stessi problemi ed ora li ho risolti con una funzione che mi "gira" la data nel formato anglosassone/americano.

Tu gli passi una data e lei te la restituisce "girata".

Te la posto.

------------------------------------------------------------
<%
Function FmtSQLDate(Astring)
If IsDate(Astring) Then
FmtSQLDate="#" & DatePart("m", Astring)& "/" & DatePart("d",Astring) & "/" & DatePart("yyyy", Astring) & "#"
Else
FmtSQLDate=""
End If
End Function
%>
------------------------------------------------------------

Ciao!

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Meglio sapere qualcosa di tutto
che tutto di qualcosa.

Blaise Pascal
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
175 messaggi dal 20 luglio 2002
www.subweb.it
Questa funzione che ho messo all inizio dovrebbe operare come la tua!

<%
function prepara_data(gg,mm,aaaa)

data_odierna= mm & gg & aaaa
response.write data_odierna
end function
call prepara_data(datePart("d",now()), datePart("m",now()), datePart("yyyy",now()))
'data_odierna="10/24/2002"
'dim data_odierna
'data_odierna = FormatDateTime(Date(),vbGeneralDate)
'data_odierna(mm,gg,aaaa)= adesso(datePart("d",now()), datePart("m",now()), datePart("yyyy",now()))
%>
Non penso che il database abbia bisogno di una data nel formato
americano!
Se imposto la data di default del recorset a 24/10/2002 infatti mi funziona correttamente visulizzando solo le promozioni dopo il 24 ottobre

COmunque voglio provare con la tua funzione
non ho capito bene come funziona pero
cioe in pratica dovrei chiamare la funzione con ladata che voglio convertire??

subweb consulting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.