Rotinas contidas na CLIWIN32.DLL

• PegaData e PegaHora
• Propósito
• Sintaxe (VB):
• Exemplo (VB):
• TestaServidor
• Propósito
• Sintaxe (VB):
• Exemplos

PegaData e PegaHora

Propósito

Estas rotinas contidas na CLIWIN32.DLL tem a função de retornar a data e hora da máquina servidor, onde foi feita a conexão.

Sintaxe (VB):

declare function PegaData lib ( "cliwin32.dll") (byval cad as string) as long

declare function PegaHora lib ( "cliwin32.dll") (byval cad as string) as long

Exemplo (VB):

dim cad  as string*12

PegaData (cad)

MsgBox cad

TestaServidor

Propósito

Estabelece, de tempos em tempos, a comunicação com o servidor (bdserv) para que o mesmo não saia do ar por timeout.

Sintaxe (VB):

Declare function TestaServidor ("cliwin32.dll") ( ) as long.

Exemplos

ret=TestaServidor()