#6
Private Sub Form_Load()
Dim Hata As Long
Dim HataMesaji As String * 128
Hata = mciSendString("open " & Chr$(34) & CurrentProject.Path & "\Hacel Obasını.mp3" & Chr$(34) & " alias YeniSes", 0, 0, 0)
mciGetErrorString Hata, HataMesaji, 128
End Sub| Bu Konudaki Yorumlar |
|
access müzik - Yazar: burak2444 - 06/11/2010, 21:20
Cvp: access müzik - Yazar: ogulcan92 - 06/11/2010, 22:08
Cvp: access müzik - Yazar: okileturc - 06/11/2010, 22:10
Cvp: access müzik - Yazar: burak2444 - 06/11/2010, 22:37
Cvp: access müzik - Yazar: ogulcan92 - 06/11/2010, 22:50
Cvp: access müzik - Yazar: burak2444 - 06/11/2010, 23:13
Cvp: access müzik - Yazar: ogulcan92 - 06/11/2010, 23:23
Cvp: access müzik - Yazar: burak2444 - 06/11/2010, 23:39
Cvp: access müzik - Yazar: ogulcan92 - 06/11/2010, 23:53
Cvp: access müzik - Yazar: burak2444 - 07/11/2010, 00:09
Cvp: access müzik - Yazar: ogulcan92 - 07/11/2010, 00:14
|
