Differenze tra le versioni di "Rmdir ()"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "La funzione '''rmdir()''' dichiarata nella libreria ''/usr/include/unistd.h'' int rmdir (const char *__path) elimina la cartella specificata nel percorso ''__path'' . Volen...")
 
 
Riga 7: Riga 7:
 
<BR>Dunque avremo ad esempio:
 
<BR>Dunque avremo ad esempio:
 
  Private <FONT color=#B22222>Extern rmdir_C</font>(__path As String) As Integer In "<FONT color=#B22222>libc:6</font>" <FONT color=#B22222>'''Exec "rmdir"'''</font>
 
  Private <FONT color=#B22222>Extern rmdir_C</font>(__path As String) As Integer In "<FONT color=#B22222>libc:6</font>" <FONT color=#B22222>'''Exec "rmdir"'''</font>
 
 
 
Semplice esempio di uso in Gambas:
 
Semplice esempio di uso in Gambas:
 
  Library "libc:6"
 
  Library "libc:6"
Riga 17: Riga 15:
 
   
 
   
 
   
 
   
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim i As Integer
 
   Dim i As Integer
 
    
 
    
  i = <FONT color=#B22222>rmdir_C</font>("<FONT Color=gray>''/percorso/della/cartella''</font>")
+
  i = <FONT color=#B22222>rmdir_C</font>("<FONT Color=gray>''/percorso/della/cartella''</font>")
  If i < 0 Then Error.Raise("Impossibile eliminare la cartella !")  
+
  If i < 0 Then Error.Raise("Impossibile eliminare la cartella !")  
 
    
 
    
  '''End'''
+
  End

Versione attuale delle 14:51, 13 giu 2024

La funzione rmdir() dichiarata nella libreria /usr/include/unistd.h

int rmdir (const char *__path)

elimina la cartella specificata nel percorso __path .


Volendola utilizzare in Gambas, bisognerà dichiararla con Extern, nonché dichiarare la libreria di C: libc.so.6, nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna "rmdir()" è omonima alla funzione di Gambas "Rmdir()", bisognerà assegnarle un nome a piacere, ma si dovrà anche richiamare il suo vero nome con il comando Exec.
Dunque avremo ad esempio:

Private Extern rmdir_C(__path As String) As Integer In "libc:6" Exec "rmdir"

Semplice esempio di uso in Gambas:

Library "libc:6"

' int rmdir (const char *__path)
' Remove the directory PATH.
Private Extern rmdir_C(__path As String) As Integer Exec "rmdir"


Public Sub Main()

 Dim i As Integer
 
 i = rmdir_C("/percorso/della/cartella")
 If i < 0 Then Error.Raise("Impossibile eliminare la cartella !") 
 
End