Erreur liste modifiable avec le fureteur Safari?

Question

Bonjour,

Je remplis 2 listes modifiables avec cette fonction:


Function DoScript
(str3
)

SQL 
    "SELECT col_id, col_subname FROM SousCat&#167;&#219;gorie WHERE col_catid  " 
& str3 
&" ORDER BY col_subname Asc"

Set rsMain 
  = Server
.CreateObject
("ADODB.Recordset"
)
rsMain
.Open SQL, MM_conn_STRING,
1,
1

intCount 
=    rsMain 
.RecordCount 
+1

If intCount > 
1 
Then
varNumber
 = "0" 
varSelect
 =  varSelect 
&"} else if (chosenval  = =  "
& str3 
& ") {" 
&chr
(10)
varSelect
  =varSelect
&"for (i=  0; i<formVar.length; i++) {"
& chr 
(10)
varSelect
 =varSelect
& "eval(""str.""+formVar[i]+"".length =  '" 
& intCount 
&"'"");"
&chr
(10)
varSelect
  =varSelect
&"eval(""str.""+formVar[i]+"".options[0].value =   '0'"");"
& chr 
(10)
varSelect
 =varSelect
& "eval(""str.""+formVar[i]+"".options[0].text =  'Sous cat&#167;&#219;gorie'"");" 
& chr 
(10)

For i 
  = 
1 
to intCount 
- 
1
varNumber
=   varNumber 
+1

varSelect
 =varSelect
& "eval(""str.""+formVar[i]+"".options[" 
&varNumber
&"].value  =  '"
& rsMain 
("col_id"
)&"'"");"
&chr
(10)
varSelect
 = varSelect
& "eval(""str.""+formVar[i]+"".options[" 
&varNumber
&"].text  =  '"
& rsMain 
("col_subname"
)&"'"");"
&chr
(10)

rsMain
.MoveNext

If rsMain
.EOF 
Then 
Exit 
For

Next

varSelect
 = varSelect
& "}" 
&chr
(10)

Else
varSelect
 =  varSelect 
&"} else if (chosenval  = =  "
& str3 
& ") {" 
&chr
(10)
varSelect
  =varSelect
&"for (i=  0; i<formVar.length; i++) {"
& chr 
(10)
varSelect
 =varSelect
& "eval(""str.""+formVar[i]+"".length =  '" 
& intCount 
&"'"");"
&chr
(10)
varSelect
  =varSelect
&"eval(""str.""+formVar[i]+"".options[0].value =   '0'"");"
& chr 
(10)
varSelect
 =varSelect
& "eval(""str.""+formVar[i]+"".options[0].text =  'No Sub Categories'"");" 
& chr 
(10)
varSelect
  =varSelect
&"}"
&chr
(10)

End 
If
DoScript
=  varSelect 
rsMain
.close

set rsMain 
 = 
nothing

End 
Function

Je ne connais rien dans les ordinateurs MAC, mais on me dit que ce code ne passe pas avec le fureteur SAFARI. Avec-vous une id&#168;&#166;e du pourquoi?

Merci &#168;&#164; l'avance,

Isabelle
(Qu&#168;&#166;bec)

cs_GodConan · Answer

une chose est sure  ;o) ce n est pas du JAVA .... ;o)

GodConan

Erreur liste modifiable avec le fureteur Safari?

1 réponse

Votre réponse

Discussions similaires