FiveTech Software tech support forums

... #DEFINE TRUE .T. #DEFINE FALSE .F. function Main() TestSend() return nil Function TestSend() Local cServer := "smtp.gmail.com" Local cUserName := "Shipping@mycompany.com" Local cPassWord := "mypassword" Local cFrom := "Shipping@mycompany.com" Local cSubject ...

... el filtro, el puntero de registro se mueve al registro más cercano respetando el filtro. * Nueva función WNetAddConnection2W( cPath, cPassword, cUserName, cDrive ) Es la versión unicode de la función existente WNetAddConnection2. * FW_STRICMP() mejorado. Se puede utilizar para comparar cadenas, ...

... respect the filter, the record pointer is moved to the nearest record respecting the filter. * New function WNetAddConnection2W( cPath, cPassword, cUserName, cDrive ) is Unicode version of the existing function WNetAddConnection2. * FW_STRICMP() improved. Can be used to compare strings as well ...

... It's Work Mr.Rao !!! Lo probé donde ud. me indicó y funcionó. HB_SetCodePage("TRWIN") FWCONNECT oCn HOST cServername USER cUsername PASSWORD cPassword DB cDatabasename PORT 3306 CHARSET "latin5" if oCn == nil msginfo("Error de conexión") return nil else ...

... siguiente código, no sólo no me muestra nada, sinó que me saca de la pantalla sin mostrar absolutamente nada. FWCONNECT oCn HOST cServername USER cUsername PASSWORD cPassword DB cDatabasename if oCn == nil ? "Connect Fail" return nil else oRs := oCn:RowSet( "lecturas" ) // ...

cServerName := "mi-paginaweb.com.ar" cDatabaseName := "pedrolavallen" cUserName := "uv_pedrol" cPassword := "sanluis" Are these the real values? If so we can not connect with FiveDBU also, either with ADO or MySql library. The ...

... ningún error. * lo ejecuto y cuando quiero conectarme se sale del programa. * uso fwh 17.09 local oCn, oRs, cPassword, cServerName, cDatabaseName, cUserName cServerName := "mi-paginaweb.com.ar" cDatabaseName := "pedrolavallen" cUserName := "uv_pedrol" cPassword := ...

... 0060: hb_vfCopyFile( hb_GetEnv( "PRGPATH" ) + "/views/form.view", hb_GetEnv( "PRGPATH" ) + "/data/" + cUserName + "/views/form.view" ) 0061: 0062 => hb_vfCopyFile( hb_GetEnv( "PRGPATH" ) + "/views/designer.view", hb_GetEnv( ...

Try

if len(alltrim(cUserName )) > 0

I am running this simple code

cUserName := "Luis"

If cUserName <> ""
? "Not Empty"
Else
? "Empty"
EndIf

The response is "Empty".
I tried everything that I can think.
Driving me crazy...

Thanks

... los códigos en fwh y en php #include "FiveWin.ch" REQUEST DBFCDX function Main() local oCn, cPassword, cServerName, cDatabaseName, cUserName cServerName := "localhost" cDatabaseName := "lavpedro_jkoslay" cUserName := "lavpedro" cPassword := "PedroLav****" ...

... PASCAL FROM "InternetCloseHandle" LIB hLib DLL32 FUNCTION INETCONNECT( hInternet AS LONG, cServerName AS LPSTR, nServerPort AS LONG, cUserName AS LPSTR, cPassword AS LPSTR, nService AS DWORD, nFlags AS DWORD, @nContext AS PTR ) AS LONG; PASCAL FROM "InternetConnectA" LIB ...

Saludos

Cuando lo compilo con Harbour me da error en estas lineas en el ADORDD.prg


STATIC t_cDataSource
STATIC t_cEngine
STATIC t_cServer
STATIC t_cUserName
STATIC t_cPassword
STATIC t_cQuery
STATIC oConnection

Dice Error E0004 STATIC Declaration Follow Executable Statement

... := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 3, ";" ) LOCAL cServer := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 4, ";" ) LOCAL cUserName := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 5, ";" ) LOCAL cPassword := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 6, ";" ) I ...

... := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 3, ";" ) LOCAL cServer := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 4, ";" ) LOCAL cUserName := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 5, ";" ) LOCAL cPassword := hb_tokenGet( aOpenInfo[ UR_OI_NAME ], 6, ";" ) I ...