Como solucionar error al utilizar la funcion FW_TransLang ?

[Erick Almanza]

Buen dia
Respetados miembros del foro, como puedo solucionar este error que me sucede al utilizar la función " FW_TransLang( )"



Application
===========
Path and name: C:\fwh17\samples\TMPOS.exe (32 bits)
Size: 4,632,576 bytes
Compiler version: Harbour 3.2.0dev (r1703231115)
FiveWin version: FWH 17.07
C compiler version: Borland/Embarcadero C++ 7.0 (32-bit)
Windows version: 6.1, Build 7601 Service Pack 1

Time from start: 0 hours 0 mins 4 secs
Error occurred at: 02/10/2017, 21:30:49
Error description: (DOS Error -2147352567) WINOLE/1007 Acceso denegado.
(0x80070005): msxml6.dll
Args:
[ 1] = C

Stack Calls
===========
Called from: => TOLEAUTO:SEND( 0 )
Called from: .\source\internal\FTRANSLATE.PRG => TRANSACTION( 89 )
Called from: .\source\internal\FTRANSLATE.PRG => FW_TRANSLANG( 52 )
Called from: TMPOS.prg => CHINOS( 9105 )
Called from: TMPOS.prg => ENTRAR( 1035 )
Called from: TMPOS.prg => PRIMERA( 578 )
Called from: TMPOS.prg => ORDEN( 536 )

System
======
CPU type: Intel(R) Core(TM) i5-2450M CPU @ 2.50GHz 2494 Mhz
Hardware memory: 2878 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Windows total applications running: 7
1 ,
2 , C:\Windows\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.7601.18837_none_41e855
3 , C:\Windows\system32\SHELL32.dll
4 , C:\Windows\system32\SHLWAPI.dll
5 , C:\fwh17\samples\TMPOS.exe
6 DDE Server Window, C:\Windows\system32\OLE32.DLL
7 GDI+ Window, C:\Windows\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.7601.23894_none_5c0be957a00992

Variables in use
================
Procedure Type Value
==========================
TOLEAUTO:SEND
Param 1: O Class: ERROR
TRANSACTION
Param 1: C ""
Local 1: U
Local 2: U
FW_TRANSLANG
Param 1: C "https://translate.googleapis.com/translate_a/single?client=gtx&sl=en&tl=es&dt=t&q=CUSTOMER"
Local 1: O Class: TOLEAUTO
Local 2: C ""
Local 3: C "application/json"
Local 4: C ""
Local 5: C "POST"
Local 6: N 0
CHINOS
Param 1: C "CUSTOMER"
Param 2: C "en"
Param 3: C "es"
Param 4: L .T.
Local 1: C ""
Local 2: C "https://translate.googleapis.com/translate_a/single?client=gtx&sl=en&tl=es&dt=t&q=CUSTOMER"
Local 3: U
Local 4: A Len: 1
Local 5: C ""
Local 6: N 1
Local 7: C "UTF8"
Local 8: C ""
Local 9: C ""
ENTRAR
Param 1: C "CUSTOMER"
Local 1: U
Local 2: U
Local 3: C " "
PRIMERA
Local 1: U
Local 2: O Class: TDIALOG
Local 3: A Len: 0
Local 4: C " "
Local 5: C " "
Local 6: N 0.00
Local 7: N 0.00
Local 8: N 0.00
Local 9: N 0.00
Local 10: C " "
Local 11: U
Local 12: C " "
Local 13: C " "
Local 14: L .T.
Local 15: C " "
Local 16: N 0.00
Local 17: N 0.00
Local 18: C " "
Local 19: N 0.00
Local 20: A Len: 0
Local 21: C " "
Local 22: A Len: 74
Local 23: U
Local 24: C " "
Local 25: C " "
Local 26: O Class: TFONT
Local 27: C "La cajera"
Local 28: C "Casa "
Local 29: O Class: TFONT
Local 30: O Class: TFONT
Local 31: C "1 "
Local 32: N 0.00
Local 33: N 0.00
Local 34: N 0.00
Local 35: A Len: 0
Local 36: C " "
Local 37: N 0.00
Local 38: N 0.00
Local 39: N 0.00
Local 40: O Class: TFONT
Local 41: O Class: TFONT
Local 42: O Class: TFONT
Local 43: U
Local 44: U
Local 45: C " "
Local 46: C " "
Local 47: C " "
Local 48: C " "
Local 49: C " "
Local 50: N 0.00
Local 51: N 0.00
Local 52: C " "
Local 53: U
Local 54: A Len: 0
Local 55: C ""
Local 56: C ""
Local 57: A Len: 0
Local 58: A Len: 0
Local 59: A Len: 0
Local 60: C "c:\arcade\temp\dev01"
Local 61: C "c:\arcade\temp\MODELO10.DBF"
Local 62: C "c:\arcade\temp\modelo80"
Local 63: C "c:\arcade\temp\modelo90"
Local 64: C "c:\arcade\temp\modelo91"
Local 65: C "c:\arcade\temp\modelo92"
Local 66: C "c:\arcade\temp\modelo93"
Local 67: C "c:\arcade\temp\modelo94"
Local 68: C "c:\arcade\temp\modelo95"
Local 69: C "c:\arcade\temp\modelo00"
Local 70: C "c:\arcade\temp\modeloTA"
Local 71: C "c:\arcade\temp\apa"
Local 72: A Len: 80
Local 73: C " "
Local 74: N 2
Local 75: C " "
Local 76: C " "
Local 77: O Class: TFONT
Local 78: N 0.00
Local 79: N 0.00
Local 80: N 0
Local 81: N 0
Local 82: L .T.
Local 83: U
Local 84: C ""
Local 85: C "C:\ARCADE\TEMP\X4401"
Local 86: N 4
Local 87: N 1
Local 88: U
Local 89: U
Local 90: U
Local 91: C "c:\arcade\image\setup.jpg"
Local 92: N 0.00
Local 93: N 0.00
Local 94: N 0.00
Local 95: N 0.00
Local 96: C " "
Local 97: C "c:\arcade\temp\creab"
Local 98: C " "
Local 99: A Len: 40
Local 100: N 1
Local 101: C " "
Local 102: C " "
Local 103: D / /
Local 104: D / /
Local 105: D / /
Local 106: N 0.00
Local 107: N 0.00
Local 108: N 250
Local 109: N 250
Local 110: N 250
Local 111: N 0.00
Local 112: N 0.00
Local 113: N 0.00
Local 114: A Len: 0
Local 115: O Class: TFONT
Local 116: C "c:\arcade\temp\pagapa"
Local 117: N 1
Local 118: C "C:\Windows\espejo.dbf"
Local 119: C "C:\Windows\espejo2.dbf"
Local 120: C "C:\Windows\espejo3.dbf"
Local 121: C "C:\Windows\espejo4.dbf"
Local 122: C "C:\Windows\espejo5.dbf"
Local 123: C "C:\Windows\espejo6.dbf"
Local 124: A Len: 0
Local 125: N 4
Local 126: N 1
Local 127: N 7
Local 128: U
Local 129: A Len: 30
Local 130: O Class: TSAY
Local 131: N -10
Local 132: U
Local 133: U
Local 134: O Class: TBRUSH
Local 135: N 238
Local 136: N 238
Local 137: N 238
Local 138: O Class: TFONT
Local 139: A Len: 2
Local 140: C "
Cliente Contado
Punto Acumulados
"
Local 141: S
Local 142: O Class: TSBUTTON
Local 143: N 803
Local 144: U
Local 145: U
Local 146: U
Local 147: U
Local 148: U
Local 149: U
Local 150: O Class: TDIALOG
Local 151: U
Local 152: U
Local 153: U
ORDEN
Param 1: C " "
Local 1: O Class: TFONT
Local 2: A Len: 0
Local 3: A Len: 0

Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFCDX
DBFNTX

DataBases in use
================

1: USUARIOS RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
2 2 .F. .F.

Indexes in use TagName

Relations in use

2: PUNTODET RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 10 .F. .F.

Indexes in use TagName
=> field->articulo PUNTO1
field->DETALLE PUNTO2

Relations in use

3: VENTAS RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 7 .F. .F.

Indexes in use TagName
=> field->articulo VENTAS1
field->documento VENTAS2
dtos(field->fecha) VENTAS3

Relations in use

4: ELPAGO RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

5: => WORK RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 15 .F. .F.

Indexes in use TagName

Relations in use

6: HMODE1 RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

7: HMODE4 RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

8: HMODE5 RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

9: HMODE6 RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

10: HMODE7 RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

11: APA RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
1 0 .T. .T.

Indexes in use TagName

Relations in use

Classes in use:
===============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TFONT
5 TBRUSH
6 TWINDOW
7 TDIALOG
8 TCONTROL
9 TBITMAP
10 TIMAGE
11 TSAY
12 TSBUTTON
13 TRECT
14 WIN_OLEAUTO
15 TOLEAUTO
16 TREG32
17 TSTRUCT

Memory Analysis
===============
646 Static variables

Dynamic memory consume:
Actual Value: 1048576 bytes
Highest Value: 1048576 bytes

[Antonio Linares]

Erick,

Comprueba estos ajustes en el navegador de Internet:

1. Enable the Tools-->Internet Options-->Advanced--> Security --> Allow active contents to run in files option

2. Check whether IE has the permission to access ActiveX components.

Tools--> Internet Options--> Custom Level (check the settings related to the ActiveX controls)

https://community.smartbear.com/t5/TestComplete-General-Discussions/msxml6-dll-access-is-denied/td-p/86226

https://stackoverflow.com/questions/17401413/msxml3-dll-access-denied

[AIDA]

Hola yo tuve el mismo problema

en mi compu quedo a si "HABILITAR" PERMITIR LA EJECUCION DE SCRIPTS EN EL CONTROL DEL EXPLORADOR WEB



pero queda a si con ese letrerito de PELIGRO


No existe otra manera para que el usuario no tenga que meter mano y que sea por codigo esa configuracion

Saluditos.

[Jimmy]

hi,

i just found this Message when work with translate.googleapis.com

Param 1: C "https://translate.googleapis.com/translate_a/single?client=gtx&sl=en&tl=es&dt=t&q=CUSTOMER"

as i can say your Error is in your String as "CUSTOMER" is not "Encode"

Code: Select all  Expand view  RUN

LOCAL cGTUrl      := "https://translate.googleapis.com/translate_a/single?client=gtx" + ;
           "&sl=" + cSourceLang + ;
           "&tl=" + cTargetLang + ;
           "&dt=t&q=" + tip_URLEncode( cSourceText )