Savoir si requete bien executée + prob CDO

[allserv]

Bonjour,

1 ere question :

Je poste ce message pour savoir s'il existe un moyen en ASP de connaitre le statut de la requete que l'on vient d'effectuer ?

En effet en php il suffit de faire :

Code :

1
2
3
<?php
$query = mysql_query("INSERT...");
if($query===FALSE){ echo "erreur"; }

Existe-il un code similaire pour ASP ?

2eme question :

J'ai une erreur lors de l'envoi d'un email avec CDO, (connexion perdue avec le serveur) la taille du corps est apparement trop important puisque si j'envoi un email avec x lignes cela fonctionne mais avec x+1 cela ne fonctionne plus.

J'aimerais savoir s'il existe un paramètre pour ce composant qui limiterait la taille des corps ?

Merci d'avance pour vos réponses

[Immobilis]

Salut,

1 - Ben faut gérer les erreurs

Code :

IF error.number <> 0 THEN response.write error.description

2 - Normalement non. De combien de ligne s'agit-il ? Ce peut être le serveur SMTP qui bloque car par défaut il limite la taille des mail à 2 Mo.

A+

[allserv]

Merci pour la réponse à la question 1

Le mail passe avec 19 lignes alors qu'avec 20 lignes sur 34 là ca perds la connexion :-\

Le corps est déclaré de cette manière :

Code :

1
2
3
4
5
6
 
objMail.htmlBody  =  "<table width='100%' border='0' cellspacing='0'>"
objMail.htmlBody  = objMail.htmlBody  & " <tr>"
objMail.htmlBody  = objMail.htmlBody  & "    <td width='13%'><font size='3' face='Comic Sans MS'><a href='http://monsite/Parc/index.php'><img src='http://monsite/Images/logo%20TS%20couleur.jpg' width='100' height='100' border='0'></a></font></td>"
objMail.htmlBody  = objMail.htmlBody  & "    <td width='87%'><p align='center'><font size='3' face='Comic Sans MS'>Intranet "
...

Tu aurais une idée ?

[Immobilis]

Perso j'utiliserai une variable de transission avant de l'affecter à l'objet.

Code :

1
2
3
4
5
6
htmlBody  =  "<table width='100%' border='0' cellspacing='0'>"
htmlBody  = htmlBody  & " <tr>"
htmlBody  = htmlBody  & "    <td width='13%'><font size='3' face='Comic Sans MS'><a href='http://monsite/Parc/index.php'><img src='http://monsite/Images/logo%20TS%20couleur.jpg' width='100' height='100' border='0'></a></font></td>"
htmlBody  = htmlBody  & "    <td width='87%'><p align='center'><font size='3' face='Comic Sans MS'>Intranet "
...
objMail.htmlBody = htmlBody

A+

[allserv]

En fait j'avais déjà testé et non cela me mets le même message d'erreur :

Type d'erreur :
CDO.Message.1 (0x80040212)
Le transport a perdu sa connexion au serveur.
/includes/mail.asp, line 95

La ligne 95 correspond à l'instruction send !

Là je vois vraiment pas où peut etre le problème

[Immobilis]

Mets tout le code qui correspond à l'envoi du mail.

[allserv]

Code :

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
 
<%
 
 
'- ------------------------------------------------	
' Fonction EnvoiMail
' Entrée/Sortie : adresse destinataire
' But : permet d'envoyer un email
 
function EnvoiMail(num_materiel,old_agence,new_agence)
		Dim objMail 
		set objMail = Server.CreateObject("CDO.Message") 		
 
		requete = " select nom_materiel, nom_marque from materiel, marque "
		requete = requete & "where materiel.num_marque = marque.num_marque and num_materiel = "&num_materiel
 
		Set rs = Server.CreateObject("ADODB.recordset")
		Set rs = db.Execute(requete)
		nom_materiel= rs(0)
		nom_marque = rs(1)
 
		requete = " select nom_agence from agence where num_agence = "&old_agence&""
		Set rs = db.Execute(requete)
		nom_old_agence= rs(0)
 
		requete = " select nom_agence from agence where num_agence = "&new_agence&""
		Set rs = db.Execute(requete)
		nom_new_agence= rs(0)
 
		date_mouvement = Date
 
 
		login = SESSION("nom_connect")
 
			requete = "Select email from agence where num_agence = "&old_agence&" or num_agence = "&new_agence
			email = ""
			Set rs = db.Execute(requete)
			while not rs.eof
			 	email = email & ","&rs(0)
			rs.movenext	
   			wend	
		email = "test@free.fr" ' juste pour le test
 
		objMail.From = "monemail@monprovider.fr" 'remplacé par la bonne email
		objMail.To = email 
		objMail.Subject = " Gestion du Materiel : Transfert du "&nom_materiel&" ("&nom_marque&") "
 
 
		htmlBody  =  "<table width='100%' border='0' cellspacing='0'>sdfsdfsdfsd"
		htmlBody  = htmlBody  & " <tr>"
		htmlBody  = htmlBody  & "    <td width='13%'><font size="
		...
htmlBody  = htmlBody  & "</table>"
		objMail.htmlBody = htmlBody
 
		objMail.Configuration.Fields.Item _
		("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 		
 
		objMail.Configuration.Fields.Item _
		("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "10.161.247.31"		
 
		objMail.Configuration.Fields.Item _
		("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
 
		objMail.Configuration.Fields.Update	
 
		objMail.Send 
end function			
 
%>

[allserv]

Je n'ai toujours pas résolu mon problème

[vincentASPNET]

Est ce que Skype est installé sur ta machine ?
Si oui, il rajoute des lignes de code dans ta page html lors de l'envoi.
Ca peut être une cause d eproblème
Autrement le mieux c'est d'essayer d'envoyer le corps de ton message avec ton logiciel de messagerie pour tester d'où vient le problème.

[jdevillele]

Bonjour,

je sais que le problème 2 a été posé il y a longtemps mais si quelqu'un est intéressé par une réponse...

Essayez de régler la MTU de votre interface réseau (avec tcpoptimizer par exemple, google est votre ami).

Explications :
Si votre MTU est trop élevée, vous pouvez rencontrer un élément de réseau dont la MTU est inférieure entre votre machine et l'hôte destinataire (un routeur entre vous et votre serveur de mail par exemple) ce qui entraine une fragmentation de paquets TCP. Certains éléments de réseau (Firewall, routeurs, etc...), 'dropent' les paquets de taille trop faibles car ceux-ci peuvent constituer une attaque en déni de service, d'où, dans le cas présent, l'impossibilité de communiquer avec votre serveur SMTP.

En espérant ne pas avoir raconter trop de bêtises,
Cordialement