entier vers String [Résolu]

[nath-0-0]

Bonjour,

Malgrés un cstr(monEntier) , je n'arrive pas à transformer mon entier en string. VOici mon code :

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
 
Dim SQLcmd2,rs2,anneeStr,annneInt
Dim MaConnExcel
 
	Set MaConnExcel = Server.CreateObject("ADODB.Connection")
	MaConnExcel.Open "DBQ=" & Server.MapPath(gRepExcel & pFicExcel) & ";DRIVER={Microsoft Excel Driver (*.xls)};"
	Set rs2 = Server.CreateObject("ADODB.Recordset")
	anneeStr = ""
	anneeStr = pAnneeDepart
	response.write "anneeStr" & anneeStr & "<br>"
	annneInt = cint(pAnneeDepart)
	response.write "annneInt" & annneInt & "<br>"
	SQLcmd2 = "SELECT * FROM " & pPlageDonnee & anneeStr &";"
	response.write SQLcmd2 & "<br>"
	rs2.Open SQLcmd2, MaConnExcel
 
		do while not rs2.eof and annneInt > 1900
 
			annneStr = Cstr(annneInt)
			response.write "*****" & anneeStr & "*****"
			SQLcmd2 = "SELECT * FROM "& pPlageDonnee & annneStr &";"
			response.write SQLcmd2 & "****<br>"
			rs.Open SQLcmd2, MaConnExcel
			annneInt= annneInt-1
		loop

mon code plante à la ligne 20:
response.write "*****" & anneeStr & "*****"

on dirait donc qu'à ce moment là il ne peut plus caster ma variable, pourquoi? bein je me le demande bien. Évidemment pas de msg d'errreur !

Merci d'avance

NAth

[pc75]

Bonjour,

Dans cette boucle, il est où le "MoveNext" ?
Derrière un rs.Open, il manque un rs.Close

Code :

1
2
3
4
5
6
7
8
9
10
 
		do while not rs2.eof and annneInt > 1900
 
			annneStr = Cstr(annneInt)
			response.write "*****" & anneeStr & "*****"
			SQLcmd2 = "SELECT * FROM "& pPlageDonnee & annneStr &";"
			response.write SQLcmd2 & "****<br>"
			rs.Open SQLcmd2, MaConnExcel
			annneInt= annneInt-1
		loop

[kaiser59]

Salut,

De plus, à mettre des noms de variables qui se ressemblent, tu t'y perds tout seul.

tu as par exemple :

Code :

response.write "*****" & anneeStr & "*****"

Le problème est qu'à "anneeStr" tu lui attributs une autre variable dont on ne sait pas ce qu'elle retourne, soit :

Code :

	anneeStr = pAnneeDepart

Si

Code :

 anneeStr = pAnneeDepart

mais que vaut

pAnneeDepart

alors ? D'où ton problème qui apparait un peu plus tard avec ton response.write

Enfin, tu ne peux pas faire ceci :

Code :

annneInt= annneInt-1

Car tu as convertis juste avant, le type de valeur de annneInt en Cstr pas de calcul possible, il te faut soit revenir en CInt soit une autre variable

[nath-0-0]

merci pour vos réponses, finalement j'ai corrigé le problème. Cela fonctionne mais je sais plus trop ce que j'ai fait pour cela