ONLINE HELP
 WINDEV, WEBDEV AND WINDEV MOBILE
Help / WLanguage / WLanguage functions / Standard functions / External file functions
  • Gestion des erreurs
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaEtats et RequêtesCode Utilisateur (MCU)
WEBDEV
WindowsLinuxPHPWEBDEV - Code Navigateur
WINDEV Mobile
AndroidWidget AndroidiPhone/iPadWidget IOSApple WatchMac CatalystUniversal Windows 10 App
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.
Exemple
// 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 : wd290std.dll
Voir Aussi
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: 05/25/2022

Send a report | Local help