PC SOFT

ONLINE HELP
FOR WINDEV, WEBDEV AND WINDEV MOBILE

Home | Sign in | English US
  • Overview
  • How to proceed?
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReports and QueriesUser code (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Browser code
WINDEV Mobile
AndroidAndroid Widget iPhone/iPadApple WatchUniversal Windows 10 AppWindows Mobile
Others
Stored procedures
User groupware and Native Access files
Native Connectors (Native Accesses)Available only with this kind of connection
Warning
From version 18, the user groupware evolves. This help page corresponds to the user groupware kept for backward compatibility. To get this help page for the new version of user groupware, see User Groupware and Native Access.
Overview
An application that is using the user groupware can be used with a database handled by a Native Access.
In order for an application that is using the user groupware to operate with a native access, you must configure the user groupware in order to use the data files found on the server. These operations are presented in this help page.
How to proceed?
To use the files of user groupware with a Native Access:
  1. The user groupware must not be started in "Automatic run" mode in your application.
    Make sure that "Automatic run" is unchecked in the window for configuring the user groupware ("Workshop .. Configure the user groupware").
  2. In the initialization code of the project, use gpwOpenConnection to describe the connection to the database handled by a Native Access.
    Caution: the passwords defined for the files of user groupware are ignored.
  3. Use gpwOpen without specifying the paths of the data files. The concept of directory does not exist in this case.
See also
Minimum required version
  • Version 9
This page is also available for…
Comments
Exemplo de uso do Driver Nativo Ms SQL Server e Groupware
//Conexao
ok, ok1, ok2, ok3 is boolean

myConn is Connection
myConn..Provider = hNativeAccessSQLServer
myConn..User = "adriano"
myConn..Password = "adriano@2016"
myConn..Source = "192.168.0.162\projeto01"
myConn..Database = "projeto01"
myConn..Access = hOReadWrite

ok1 = HOpenConnection(myConn)
IF ok1 = False THEN
Info(ErrorOccurred() +" - "+ HErrorInfo())
END


IF gpwInitAnalysis() = False THEN
Error(ErrorInfo())
ok2 = False
ELSE

ok2 = True
IF gpwOpen() = gpwOk
ok3 = True
ELSE
Info(ErrorOccurred() +" - "+ HErrorInfo())
ok3 = False
END

END

NextTitle("Atenção")

IF ok1 = True AND ok2 = True AND ok3 = True THEN //deve dar tudo ok

Info("Conectou com sucesso no banco de dados!")

ELSE

Info("Falha ao tentar conectar no Servidor")

END
BOLLER
Nov. 28 2016