problème cellule vide access + page asp

Question

bonjour j'aimerai savoir si la cellule d'un base de donné contient un adresse internet ou si elle est vide, j'ai donc le code suivant et la fonction qui appelle cette fonction sql="SELECT * FROM clients where ((nomentreprise = '"&nomentrepris&"'))" set rsenvoi = Server.CreateObject("ADODB.Recordset") rsenvoi.open sql, conn, 3, 1 mailclient = rsenvoi.Fields("Emailfact").Value rsenvoi.Close set rsenvoi=Nothing dim verif if mailclient = "" then verif = verification() else suite du programme si il y a une adresse, la suite du programme s'éxecute correctement, et si la cellule d'access est vide il ne se passe rien, meme pas le message disant que le destinataire n'a pas d'adresse dans la base de donnée. merci de votre aide

cs_ghuysmans99 · Answer

C'est logique : tu as implémenté ta fonction verification() du mauvais côté (client). Fais aussi attention à l'injection SQL ! Voilà un code qui devrait fonctionner :
<%
Public Function Pure(S) 'As String
 Pure = Replace(S,"'","''")
End Function

[...]

sql "SELECT * FROM clients where ((nomentreprise '" & Pure(nomentrepris) & "'))"
Set rsEnvoi = Conn.Execute(sql)

mailClient = rsEnvoi("Emailfact")
rsEnvoi.Close : Set rsEnvoi = Nothing

If mailClient "" Or mailClient vbNullString Then
Response.Write "Erreur, pas de destinataire ..."
Else
[...]
End If
%>
---
VB.NET is good ... VB6 is better

tatsurou25 · Answer

désolé pour le temps de réaction mais j'ai été pas mal prit ces dernier temps.

Merci pour ta réponse, c'est mieux maintenant. Encore merci

Problème cellule vide access + page asp

2 réponses

Votre réponse

Discussions similaires