Anasayfa > Kodlar > Api kullarak temp dizinini öğrenmek

Api kullarak temp dizinini öğrenmek


API kullarak temp dizinini ögrenmek için aşağıdaki kodu kullanabiliriz.API tanımı için projeye yeni bir modul ekleyin ve tanımı orada yapınız.


Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long



Private Sub Command1_Click()
Dim uzunluk As Long
Dim s As String
s = Space(255)
uzunluk = GetTempPath(255, s)
If (uzunluk <> 0) Then
s = Mid(s, 1, uzunluk)
Text1.Text = s
End If
End Sub

Reklamlar
  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Yanıt Bırakın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: