Pergunta : VBScript substitui a função & o símbolo do £?

Olá!, o

I escreveu a seguinte função de VBScript, que parece trabalhar em tudo mas o símbolo do £??? Alguma idéia a respeito do que eu fiz erradamente?

Thanks

 class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
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:
class= ><% " notpretty " do id= " codeSnippet848706 " do 
”, o "")
  o strInput = substitui (strInput, “? ”, "")
  o strInput = substitui (strInput, “\”, o "")
  o strInput = substitui (o strInput, “|”, "")
  o strInput = substitui (strInput, “`”, o "")
  o strInput = substitui (strInput, “¬”, o "")
  o strInput = substitui (strInput, “; ”, "")
  o strInput = substitui (strInput, “: ”, "")
  o strInput = substitui (strInput, “@”, o "")
  o strInput = substitui (strInput, “'”, o "")
  o strInput = substitui (strInput, “#”, o "")
  o strInput = substitui (strInput, “~”, o "")
  o strInput = substitui (strInput, “[”, o "")
  o strInput = substitui (strInput, “{”, o "")
  o strInput = substitui (strInput, “]”, o "")
  o strInput = substitui (strInput, “}”, o "")
  canurl = strInput
Função do fim   
    %>
class= do

Resposta : VBScript substitui a função & o símbolo do £?


se o tipo de dados de [shippernum] é texto

Me.NCOsubform.Form.Filter = “[shippernum] = '” & ShipperText & “'”
Me.NCOsubform.Form.FilterOn = retificam
Outras soluções  
 
programming4us programming4us