Escape/Unescape() din VBScript exista in VBA?
Last Updated: Sep 30 2010 02:02, Started by
mad_igor
, Sep 29 2010 11:03
·
0
#1
Posted 29 September 2010 - 11:03
Salutare!
Am un macro in excel care imi ia niste date dintr-o baza de date. Baza de date are entry-urile de tip text codate cu percent-encoding(escape() function). Am cautat pe net, si am vazut ca exista functia de unescape() pentru vpscript incepand cu versiunea 5, dar nu reusesc sa o gasesc sa o folosesc in macro-ul de excel. Trebuie sa import ceva librarie mai speciala? Exista vreun work-around la chestia asta? Sau trebuie sa ma pun sa fac functia de mana? Merci tare mult pentru support. |
#2
Posted 30 September 2010 - 02:02
MSSCRIPT.OCX mi se pare sau construieste functiile tu.
Uite Google zice asa: Function Escape(s As String) As String Dim scr As Object Set scr = CreateObject("MSScriptControl.ScriptControl") scr.Language = "VBScript" scr.Reset Escape = scr.Eval("escape(""" & s & """)") End Function Function Unescape(s As String) As String Dim scr As Object Set scr = CreateObject("MSScriptControl.ScriptControl") scr.Language = "VBScript" scr.Reset Unescape = scr.Eval("unescape(""" & s & """)") End Function |
Anunturi
Bun venit pe Forumul Softpedia!
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users