class= " lineNumbers " del
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
|
class= del
>Dim notpretty " del class= " del id= " codeSnippet938263 del ” y vbCrLf)
Para cada n en Query1
Si ZipCM.Security.CanAccess (nuevo número entero () {1, 2, 3, 4, 5}) entonces
Dévil Query2 = de NL en n.ToString (). Fractura (“|") donde NL (1) = “0” y (NL (2) = “1” o NL (2) = “2”) tmpNav.Append (“"" del site_nav del "" del class= del ” y Query2.Count y “” y vbCrLf)
ElseIf no (ZipCM.Security.CanAccess (nuevo número entero () {1, 2, 3, 4, 5})) Entonces
Dévil Query2 = de NL en n.ToString (). Fractura (“|") donde NL (1) = “0” y (NL (2) = “0” o NL (2) = “2”) tmpNav.Append (“"" del site_nav del "" del class= del ” y Query2.Count y “” y vbCrLf)
Dévil Query2 = de NL en n.ToString (). Fractura (“|") donde NL (1) = “0” y (NL (2) = “2”)
tmpNav.Append (“"" del site_nav del "" del class= del ” y Query2.Count y “” y vbCrLf)
Terminar si
Después
tmpNav.Append (“” y vbCrLf)
|