asp et fonctions

Version imprimable

07/10/2005, 16h33
maxos75

asp et fonctions
Bonjour g un problème

g une fonction enregistrer()
laquelle renvoi "ok" si l'enregistrement s'est fait
ou le message d'erreur si le sérial materiel à enregistrer est déjà renseigner

Pour afficher, je fais:
Code:

1 2 3 4 5 6 7 8 <%info=enregistrer()%> <%If info= "ok" Then%> <td>ok tout s'est bien passé</td> <%else%> <td><%=info%></td> <%End If%>
or j'ai une erreur a chaque fois il enregistre le matériel mais m'affiche le message comme quoi le serial est renseigné.

Est ce qu'il est possible qu'a chaque fois que j'appelle info ça m'appelle la fonction plutot que la réponse enregistrée dans la variable? Si oui comment faire ???
07/10/2005, 16h38
Pymm

Peut-on voir ta fonction enregistrer ?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
	function enregistrer(num)
		serial=Cstr(num)
		sql_verif="SELECT * FROM CARTES where SERIAL LIKE '" & serial & "' "
		Set num_verif=connexion.Execute(sql_verif)
		If num_verif.eof then
			num_existe=1
		end if
		If num_existe=1 then
			sql_add="INSERT INTO CARTES (Serial, Etat, Localisation) VALUES ('" & serial & "', 'Vierge', 1)"
			add=connexion.Execute(sql_add)
			Set add= Nothing
			enregistrer="ok"
		else
			enregistrer="probleme"
		end if
		Set num_existe=nothing
		Set num_verif = nothing
	end function

voilà voilà

remplace add par un autre nom de variable car il me semble que c'est un mot réservé

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
function enregistrer(num)      
      sql_verif="SELECT * FROM CARTES where SERIAL LIKE '" & num & "' "
      Set num_verif=connexion.Execute(sql_verif)
      If num_verif.eof then              
         sql_add="INSERT INTO CARTES (Serial, Etat, Localisation) VALUES ('" & serial & "', 'Vierge', 1)"
         ajout=connexion.Execute(sql_add)
         Set ajout= Nothing
         enregistrer="ok"
      else
         enregistrer="probleme"
      end if
      Set num_verif = nothing
   end function

J'ai enlevé les lignes qui me paraissaient pas utile, ça restreint le champ d'investigation :wink:

11/10/2005, 09h53
pc75
Bonjour,

Ta fonction enregistrer(num) reçoit un paramètre, mais je ne vois pas ce paramètre dans l'appel de la fonction :
Code:

1 2 <%info=enregistrer()%>