Skip to main content

AccessTr.neT


ses kaydı yapmak

zetyu
zetyu
1
1773

ses kaydı yapmak

#1
ses kayıt işlemi yapabilirmiyim diye araştırdığımda aşağıdaki vb kodlrını gördum örnekte denedim ama başaramadım yardımlarınızı bekliyorum...

Imports System.Runtime.InteropServices

<DllImport("winmm.dll", EntryPoint:="mciSendStringA", CharSet:=CharSet.Ansi, SetLastError:=True, ExactSpelling:=True)> _
Private Shared Function mciSendString(ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Integer, ByVal hwndCallback As Integer) As Integer
End Function

Public Sub Kaydedici(ByVal islem As String, ByVal path As String, ByVal isim As String)
If islem = "baslat" Then
mciSendString("open new Type waveaudio Alias recsound", "", 0, 0)
mciSendString("record recsound", "", 0, 0)
ElseIf islem = "bitir" Then
mciSendString("save recsound " & path & "/" & isim & ".wav", "", 0, 0)
mciSendString("close recsound ", "", 0, 0)
End If
End Sub


Kaydı başlat kodu:
Kaydedici("baslat","","")

Kaydet ve bitir kodu :
Kaydedici("bitir","C:","ses_kaydi")
.rar ses kaydet.rar (Dosya Boyutu: 10,16 KB | İndirme Sayısı: 15)
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 26/07/2013, 19:29, Düzenleyen: zetyu.
Cevapla
#2
ses kayıt için kodlar var ve ekte mevcut .hocalarımın gözünden kaçmış olabilir tekrar hatırlatmak istedim
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da