Discussion :

[surfeur2]

Bonjour,

j'ai suivi une formation OnLine sur ajax mais les explications était pour l'utilisation avec du PHP or sur mon site j'utilise ASP.

J'ai essayé de faire un exercice mais j'ai du mal à trouver la bonne syntaxe pour transformer l'objet en Json.

Voici le code que j’utilise:

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
strAccessDB = "/Base/nn.mdb"
DSN_BASE2 = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(strAccessDB)
Set CONN2 = Server.CreateObject("ADODB.Connection")
CONN2.Open DSN_BASE2
 
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * from Villes"
rs.Open sql, CONN2,3,2,1
 
Total = rs.recordcount
 
dim ville(6000)
dim code(6000)
 
dim tab(6000)
 
for i =1 to Total
	if not rs.eof then
		ville(i) = rs("localite")
		code(i) = rs("distance")		
		rs.movenext
	end if	
next
 
Json = '{"suggest": ['	
 
for i=1 to Total
	varObjet = '{ville":"' & ville(i) & ',"code":"' & code(i) & '"}'	
next
 
Json = Json & ']}'
 
Response.write Json
 
 
rs.close
set rs = nothing
 
CONN2.close
set CONN2 = nothing

Il faudrait m'aider pour trouver la bonne syntaxe pour construire l'objet Json (mettre varObjet dans tab puis concaténer....) et ainsi pouvoir le récupérer dans l'autre page......

[surfeur2]

J'ai réussi à créer le jason :

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
26
27
28
29
30
31
32
33
34
 
<%   
str = request.form("str")
Dim rsMain,sqlMain,rettxt,JobOpenToArr
 
strAccessDB = "/Base/mm.mdb"
DSN_BASE2 = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(strAccessDB)
Set CONN2 = Server.CreateObject("ADODB.Connection")
CONN2.Open DSN_BASE2
 
Set rsMain = Server.CreateObject("ADODB.RecordSet")
sqlMain = "select localite FROM Villes WHERE localite LIKE '%"&str & "%' group by localite order by localite" 
rsMain.Open sqlMain, CONN2,3,2,1
 
Total = rsMain.recordcount
Response.write "Total: " & Total
 
if Not rsMain.Eof  Then   
              '## build the string
       rettxt = "{localite:""" & str & """, suggestions:["
 
     JobOpenToArr = rsMain.getRows()     
     For i = 0 to UBound(JobOpenToArr,2)
 
       rettxt = rettxt & """" & JobOpenToArr(0,i) & ""","
 
     Next    
     '##knock off trailing comma
     rettxt = left(rettxt,len(rettxt)-1)
     rettxt = rettxt & "]}"
     Response.Write rettxt 
 
end if
%>

Dans l'autre page je récupére le text avec ceci > var retour = objxhr.responseText

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
 
function autocompleteX(arg){
			var objxhr = xhr_connect()
			if (objxhr){
				objxhr.onreadystatechange = function(){
					if (objxhr.readyState == 4) {
						if (objxhr.status == 200) {
							var retour = objxhr.responseText							
							ret = document.getElementById("retour")							
 
							ret.innerHTML = retour
 
 
						}
					}
				}
				var sql = "str="+arg
				objxhr.open("Post", "autocompleteA.asp", true)
				objxhr.setRequestHeader('Content-Type','application/x-www-form-urlencoded');
				objxhr.send(sql)
			} else {
				alert("soucis d'xmlHTTPRequest")
			}
		}

si dans l'input text je tape a, cela me donne ceci :

Total: 22{localite:"a", suggestions:["Aadorf","Aarau","Aarberg","Aarburg","Aarwangen","Aathal seeegraben","Aawangen","Ablandschen","Abtwil","Achseten","Acla (safien)","Aclens","Acquarossa","Adelboden","Adetswil","Adligenswil","Adlikon","Adliswil","Aedermannsdorf","Aefligen","Aeschau","Aeschi"]}

---------------------------------------------------------------------------------------------------------------------------------------------------

maintenant dans ret.innerHTML je souhaite crée un ul et mettre chaque localité dans un li.....

merci de m'aider !

----------------------------------------------------------------------------------------------------------------------------------------------------

[surfeur2]

J'ai réussi:

Code :

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

1
2
3
4
5
6
7
8
 
var html = '<ul>';
							var json = eval( '('+ retour + ')' );
							for (var i =0;i<json.suggestions.length;i++){
								html += "<li><span>" + json.suggestions[i] + "</span></li>"
							}
							html += '</ul>'
							ret.innerHTML = html

[surfeur2]

J'ai encore un petit soucis lors de récupération !

j'ai ajouté un onClick et j'aimerai récupérer la valeur

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
 
 
	function remp(arg){		
			alert(arg)
 
 
		}
 
if (objxhr.status == 200) {
							var retour = objxhr.responseText
 
							var html = '<ul>';
							var json = eval( '('+ retour + ')' );							
							for (var i =0;i<8;i++){							
								if (json.suggestions[i] != undefined){
									html += "<li><span><a href='#' onClick='remp(" + json.suggestions[i] + ")'>" + json.suggestions[i] + "</a></span></li>"
								}
							}
							html += '</ul>'
							ret = document.getElementById("retour")	
							ret.innerHTML = html
 
						}

si je met json.suggestions[i] comme argument

j'ai undefined dans l'alert.....

[surfeur2]

J'ai un peu améliorer le code :

Code :

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

1
2
 
html += "<li onClick='remp(this)'><span>" + json.suggestions[i] + "</span></li>"

avec ceci dans l'alert j'ai : [object HTMLLIElement]




Comment récupérer le text du "Li" ?

[surfeur2]

Bon, comme d'habitude j'ai du me débrouiller tout seul, pas beaucoup de réponse de votre part...

voici la solution:

function remp(arg){
x = arg
x2 = x.firstChild.firstChild.nodeValue
alert(x2)
}