title image


Smiley Auch das ist kein Problem
im VB folgendes tun:





1. Im Menü => Add-Ins => Add-In Manager

2. VB6 Resource Editor laden und OK klicken

3. Resource Editor starten (taucht als icon auf in Menüleiste auf)

4. WAV Datei hereinladen und und id festlegen (Eigenschaften) => und merken ;)



dann kannst du mit folgenden Code die WAV Datei lokal entpacken und darauf zugreifen:



RES_Entladen "7", "WAV", "Dateiname.wav"



Private Sub RES_Entladen(ID_Ressource As String, _

Typ_Ressource As String, FileName As String)

Dim sType As String

Dim lFile As Long

Dim lID As Long

Dim bt() As Byte



On Error Resume Next

lFile = FreeFile

Open WindowsDir() & "\" & FileName For Binary As #lFile

lID = CLng(ID_Ressource)

sType = Typ_Ressource

bt = LoadResData(lID, sType)

Put #lFile, , bt()

Close #lFile

End Sub



MFG Claudi

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: