Erreur de syntaxe dans une requête

**dark_geek** · 21/05/2009, 23h16

Bonsoir tout le monde,

Le programme m'affiche qu'il y'a une erreur de syntaxe dans la requête suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
set cmd=Server.CreateObject("ADODB.COMMAND")
cmd.ActiveConnection = con
cmd.CommandText = "SELECT numChambre, id_Type, id_Disposition, etage FROM R_Chambres_Occupees WHERE etiquette='" & choix_hotel & "' and " & comparer_date( & "dateDebutOccupation" & ,dateDebutOccupationSaisie, & "dateFinOccupation" & )=-1 & "and " & comparer_date( & "dateDebutOccupation" & ,dateFinOccupationSaisie, & "dateFinOccupation" & )=-1 
set tableau=cmd.Execute

Où j'essai de tester la valeur de la fonction que j'ai défini dans mon programme et qui a la structure suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
comparer_date(date_debut,date_saisie,date_fin)

si vous arrivez à identifier l'erreur je vous remercie d'avance de me le prèciser.

Cordialement.

**roro06** · 21/05/2009, 23h44

Bonjour

Tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

response.write cmd.CommandText

et tu verras vite ou est l'erreur

**dark_geek** · 21/05/2009, 23h55

Je sais où est l'erreur mais je ne sais pas comment corriger, on me dit que l'erreur est ici: comparer_date( & au niveau de "( &"

Invité · 22/05/2009, 17h56

Bonjour

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
<%
cmd.CommandText = "SELECT numChambre, id_Type, id_Disposition, etage FROM R_Chambres_Occupees WHERE etiquette='" & choix_hotel & "' and " & comparer_date(dateDebutOccupation,dateDebutOccupationSaisie,dateFinOccupation) & "=-1 and " & comparer_date(dateDebutOccupation,dateFinOccupationSaisie,dateFinOccupation) & "=-1"
%>

**dark_geek** · 22/05/2009, 21h22

bien noté, mais comment le programme reconnaitra que dateDebutOccupation et dateFinOccupation sont des éléments de R_Chambres_Occupees?

**roro06** · 22/05/2009, 21h46

Il ne le saura pas !

Je suppute que r_chambres_occupees est une vue et que comparer_date() est une fonction vbscript au niveau d'ASP ?

Il serait intéressant que tu nous dises à quoi sert exactement comparer_date (du code !)

**dark_geek** · 23/05/2009, 06h06

la fonction vérifie si date_saisie est compris entre date_debut et date_fin, et oui elle est écrite en VB au niveau du code ASP..le code n'est pas très interessant mais je vais le recopier:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
function comparer_date(date_debut,date_saisie,date_fin)
 
		JJdate_debut=day(date_debut)
		MMdate_debut=month(date_debut)*30
		AAdate_debut=year(date_debut)*356
		DD=JJdate_debut+MMdate_debut+AAdate_debut
 
		JJdate_saisie=day(date_saisie)
		MMdate_saisie=month(date_saisie)*30
		AAdate_saisie=year(date_saisie)*356
		DS=JJdate_saisie+MMdate_saisie+AAdate_saisie
 
		JJdate_fin=day(date_fin)
		MMdate_fin=month(date_fin)*30
		AAdate_fin=year(date_fin)*356
		DF=JJdate_fin+MMdate_fin+AAdate_fin
 
		if (DS<=DF and DS>=DD) then
			comparer_date=1
		else
			comparer_date=-1
		end if
 
end function

comme vous pouvez le deviner date_saisie est recupérée à partir du site et date_debut et date_fin sont enregistrées au niveau de la base de données.

J'espère que le problème est bien clair maintenant.

**Immobilis** · 27/05/2009, 01h13

Salut,

DateDiff devrait faire ton bonheur non? http://www.w3schools.com/Vbscript/vb...tions.asp#date

A+

Invité · 28/05/2009, 10h10

Bonjour,
je pense que ta fonction n'est pas adaptée à ton besoin :
il faut comparer les dates au niveau SQL, et pas asp.
La date enregistrée dans la BD a un format spécifique (ex :JJ/MM/AAAA)
(dépend du format "date" défini dans la BD : regarde dans ta BD comment les dates sont enregistrées)

Il te faut une fonction qui transforme les dates saisies "asp" en date au format SQL :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
<%
function dateSQL(ladate)
	ladate --> transforme la date saisie au format SQL (ex : de la forme JJ/MM/AAAA)
end function
%>

Et dans la requete :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
<%
cmd.CommandText = "SELECT numChambre, id_Type, id_Disposition, etage FROM R_Chambres_Occupees WHERE etiquette='" & choix_hotel & "' AND (" & dateSQL(dateDebutOccupationSaisie) & " BETWEEN dateDebutOccupation AND dateFinOccupation) AND (" & dateSQL(dateFinOccupationSaisie) & " BETWEEN dateDebutOccupation AND dateFinOccupation)"
%>