class= " lineNumbers " de
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
|
class= de
>Dim " de l'id= " codeSnippet938263 de » et vbCrLf)
Pour chaque n dans Query1
Si ZipCM.Security.CanAccess (nouveau nombre entier () {1, 2, 3, 4, 5}) puis
Faible Query2 = du NL dans n.ToString (). Fente (« |") où le NL (1) = « 0 » et (le NL (2) = « 1 » ou le NL (2) = « 2 ») tmpNav.Append (« "" de site_nav de "" de class= de » et Query2.Count et « » et vbCrLf)
ElseIf pas (ZipCM.Security.CanAccess (nouveau nombre entier () {1, 2, 3, 4, 5})) Puis
Faible Query2 = du NL dans n.ToString (). Fente (« |") où le NL (1) = « 0 » et (le NL (2) = « 0 » ou le NL (2) = « 2 ») tmpNav.Append (« "" de site_nav de "" de class= de » et Query2.Count et « » et vbCrLf)
Autrement
Faible Query2 = du NL dans n.ToString (). Fente (« |") où le NL (1) = « 0 » et (le NL (2) = « 2 »)
tmpNav.Append (« "" de site_nav de "" de class= de » et Query2.Count et « » et vbCrLf)
Finir si
Après
tmpNav.Append (« » et vbCrLf)
|