ONLINE HELP
 WINDEVWEBDEV AND WINDEV MOBILE

Help / WLanguage / WLanguage functions / Standard functions / External file functions
  • Gestion des erreurs
WINDEV
WindowsLinuxJavaEtats et RequêtesCode Utilisateur (MCU)
WEBDEV
WindowsLinuxPHPWEBDEV - Code Navigateur
WINDEV Mobile
AndroidWidget AndroidiPhone/iPadWidget IOSApple WatchMac Catalyst
Autres
Procédures stockées
Renvoie ou modifie le disque en cours.
JavaPHP Dans cette version, il n'est pas possible de modifier le disque en cours.
// Connaître le disque en cours
ResDisqueEnCours = fDisqueEnCours()
Syntaxe

Connaître le disque en cours Masquer les détails

<Résultat> = fDisqueEnCours()
<Résultat> : Chaîne de caractères
Chemin du disque en cours sous la forme :
  • <lettre du lecteur>:. Par exemple : "A:". La lettre du lecteur est en majuscule.
  • chemin UNC. Par exemple : "\\<NomServeur>\<NomPartage>".
WINDEVWEBDEV - Code ServeurEtats et RequêtesCode Utilisateur (MCU)Ajax

Modifier le disque en cours Masquer les détails

<Résultat> = fDisqueEnCours(<Chemin du nouveau disque en cours>)
<Résultat> : Chaîne de caractères
Chemin du disque en cours sous la forme :
  • <lettre du lecteur>:. Par exemple : "A:". La lettre du lecteur est en majuscule.
  • chemin UNC. Par exemple : "\\<NomServeur>\<NomPartage>".
<Chemin du nouveau disque en cours> : Chaîne de caractères
Chemin du nouveau disque en cours (260 caractères maximum) de la forme :
  • <lettre du lecteur>:. Par exemple : "x:".
  • chemin UNC. Par exemple : "\\<NomServeur>\<NomPartage>".
Remarques
WINDEVWEBDEV - Code ServeurEtats et RequêtesCode Utilisateur (MCU)Ajax

Gestion des erreurs

Attention : La fonction fDisqueEnCours ne retourne pas de code d'erreur. Pour savoir si cette fonction a généré des erreurs, utilisez la fonction ErreurInfo avec la constante errMessage.
Composante : wd300std.dll
Minimum version required
  • Version 9
Comments
Example fCurrentDrive()
PROCEDURE DB_Inicialize(TrueFalse)

Server, User, Password, BD is string

NextTitle("Atenção")

IF TrueFalse = True THEN

PathFile is string = fCurrentDir( fCurrentDrive() ) +"\config.ini"

IF fFileExist(PathFile) = True THEN

Server = INIRead("Nagyro", "Server", "", PathFile)
IF ErrorOccurred = True AND Server = "" THEN
Error()
END

User = INIRead("Nagyro", "User", "", PathFile)
IF ErrorOccurred = True AND User = "" THEN
Error()
END

Password = INIRead("Nagyro","Password", "", PathFile)
IF ErrorOccurred = True AND Password = "" THEN
Error()
END

BD = INIRead("Nagyro", "BD", "", PathFile)
IF ErrorOccurred = True AND BD = "" THEN
Error()
END

Sincronizar = INIRead("Nagyro", "Sincronizar", "", PathFile)
IF ErrorOccurred = True AND Sincronizar = "" THEN
Error()
END

HCloseConnection(ConnNativa)

ConnNativa..Server = Server
ConnNativa..User = User
ConnNativa..Password = Password
ConnNativa..Database = BD
ConnNativa..Provider = hNativeAccessSQLServer
ConnNativa..Access = hOReadWrite
ConnNativa..ExtendedInfo = "Extended information"
ConnNativa..CursorOptions = hClientCursor

ok is boolean = HOpenConnection(ConnNativa)

IF ok = False

Info(ErrorInfo())
Close()

ELSE

Info("OK")

END

ELSE
Info("Arquivo de configuração config.ini não localizado.")
END

END

IF Sincronizar = "S" THEN
ExeRun("NET TIME \\192.168.1.180 /SET /YES",exeIconize,exeDontWait)
END
adrianoboller
24 Feb. 2015

Last update: 09/13/2024

Send a report | Local help