segunda-feira, 12 de setembro de 2016

Acessando Firebird via WX

http://www.windevbrasil.com.br/index.php/topic,1818.0.html



FBConnection is Connection

bResultado   is boolean
_nomeDSN is string = "FbCnn"
_caminhofdb      is string = fCurrentDir()+[fSep()]+"data"+[fSep()]+"SpedDB.fdb"
_IpServidor  is string = "localhost"
_usuarioBd is string = "SYSDBA"
_senhaBd is string = "masterkey"

HDescribeConnection(FBConnection,_usuarioBD,_senhaBD,_nomeDSN,_caminhofdb,hODBC,hOReadWrite)

bResultado = HOpenConnection(FBConnection)

IF bResultado <> 1 THEN
 Error(HErrorInfo())
 EndProgram()
END

//Com SQLConnect()

SQLConnect(_DSN,_usuariodb,_senhadb,_pathfdb,"",hODBC)
 




 

Station de développement passée sous Windows 10 "Anniversary update" (redstone), mise à jour recommandée...

http://blogs.pcsoft.fr/blogs.awp




Sql Server - Acessando Banco SQL Server externo via OLEDB no Webdev 19


http://leonardo-vilani.blogspot.com.br/2015/05/acessando-banco-sql-server-externo-via.html





Dois Milhoes Google +



Video youtube



Vou Mostrar os Numeros
Google + = 2 Milhoes de Visualizações
Google + = 74 Seguidores
Blog -      = 130 Mil Visualizações
Post no Blog = 2016 = 441 2015=1002 2014 =103 Total = 1546 Post
Youtube  = 81 Visualizações e 299 Inscritos
Youtube  = 907 Videos




I'll Show Numbers
Google + = 2 Views of Millions
Google + = 74 Followers
Blog - = 130 thousand Views
Post to Blog = 2016 = 441 2015 = 1002 2014 = 103 Total = 1546 Post
Youtube Views = 81 and 299 Subscribers
Youtube = 907 Videos

Je vais afficher les numéros
Google + = 2 Vues de millions
Google + = 74 Abonnés
Blog - = 130 mille Vues
Post Blog = = 441 2015 2016 = 1002 2014 = 103 total = 1546 Poster
Youtube Vues = 81 et 299 Abonnés
Youtube = 907 Vidéos

























Curso WinDev - Funções Windows/Janela - 005 - Windows - ThreadExecute










Video Youtube - Se Gostou do Video Clique Aqui para Dar Joinha



Nessa aula vou mostrar como fazer uma thread com OpenSister

In this lecture I will show how to make a thread with OpenSister

Dans cette conférence, je vais vous montrer comment faire un fil avec OuvreSoeur

http://doc.windev.com/en-US/?3077024&name=ThreadExecute

Blog - WinDev - Funções Windows/Janela - 001/... - OpenSister
Blog - WinDev - Funções Windows/Janela - 002/... - CurrentTitle
Blog - WinDev - Funções Windows/Janela - 003/... - The Splitter Control
Blog - WinDev - Funções Windows/Janela - 004/... - Windows - PopuMenu
Blog - WinDev - Funções Windows/Janela - 005/... - Windows - ThreadExecute
Blog - WinDev - Funções Windows/Janela - 006/... - WinStatus



//Inicio Backup

OpenSister(WIN_backup_mostra_imagen)
ThreadExecute("copia_dados",threadNormal,"copia_dados")

//procedure copia

PROCEDURE copia_dados()

Backup_matos is hBackupDescription
Backup_matos..Enabled=True // novo
Backup_matos..Description=EDT_backup_nome
Backup_matos..WithIndex=True // backup indice levar
Backup_matos..ProgressBar="PROGBAR_backup"
Backup_matos..Destination=EDT_backup_diretorio_destino
Backup_matos..Source=EDT_nome_base
Backup_matos..Compression=zipFormatZIP
Backup_matos..LimitNumberBackups=10
EDT_backup_informacao="Nome Backup : "+EDT_backup_nome
EDT_backup_informacao+=CR+"Diretorio Destino  : "+EDT_backup_diretorio_destino
EDT_backup_informacao+=CR+"Nome Base  : "+EDT_nome_base
HCloseConnection(Matos_hyperfil_server)
n_id is int=HBackup(Matos_hyperfil_server,Backup_matos)
HChangeConnection("*",Matos_hyperfil_server)
EDT_backup_informacao+=CR+HInfoBackup(Matos_hyperfil_server,n_id)
INIWrite("Backup","backup_nome",EDT_backup_nome,fCurrentDir()+"\erpmatos.ini")
INIWrite("Backup","backup_diretorio_destino",EDT_backup_diretorio_destino,fCurrentDir()+"\erpmatos.ini")
Close(WIN_backup_mostra_imagen)
InfoWithTimeout(600,"Finalizado Backup")
Close(WIN_Backup_backup_Dados)































Teste

Teste
teste