سئوالی که فکر کنم به توابع io مربوط باشه.

سلام خدمت دوستان عزیز:10:
من میخواستم بدونم چه طوری میشه به جزئیات فایل های آهنگ دسترسی داشت و از داخل برنامه اونارو تغییر داد.:8:
منظورم از جزئیات همون اسم آلبوم , شماره آهنگ , لیریسک و .... بود.
پیشا پیش تشکر میشه .:11:

کد:

---

Imports System.IO
Public Class Form1
    Public Structure MediaID3Structure
        Dim Artist As String
        Dim Album As String
        Dim Title As String
        Dim Genre As String
        Dim Year As String
    End Structure
    Public Function GetMediaData(ByVal FileName As String) As MediaID3Structure
        Dim NewID3 As MediaID3Structure
        Dim SeekPoint As Integer
        Dim FS As New FileStream(FileName, FileMode.Open) 'Open The File And Assign It To FS
        Dim BR As New BinaryReader(FS) 'Create A New Reader For FS
        SeekPoint = 128
        FS.Seek(FS.Length - (SeekPoint), SeekOrigin.Begin)
        If BR.ReadChars(3) = "TAG" Then
            NewID3.Title = Replace(BR.ReadChars(30), Chr(0), "")
            NewID3.Artist = Replace(BR.ReadChars(30), Chr(0), "")
            NewID3.Album = Replace(BR.ReadChars(30), Chr(0), "")
        End If
        If NewID3.Album = "" Then NewID3.Album = "Unknown"
        If NewID3.Artist = "" Then NewID3.Artist = "Unknown"
        If NewID3.Title = "" Then NewID3.Title = "Unknown"
        NewID3.Year = "Unknown"
        NewID3.Genre = "Unknown"
        FS.Close()
        BR.Close()
        Return NewID3
    End Function
    Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
        Dim MyData As MediaID3Structure
        MyData = GetMediaData("C:\MyMP3.mp3")
        MsgBox("Title: " & MyData.Title & vbCrLf & "Album: " & MyData.Album & vbCrLf & "Artist: " & MyData.Artist)
    End Sub
End Class

---

منبع: MSDN

باز هم سلام خدمت دوستان عزیز
ببخشید باز هم مزاحم میشم .
ولی من این کد رو کپی کردم توی برنامم (البته چیز زیادی ازش نفهمیدم ) وقتی باهاش کار می کنم بدون هیچ خطایی اجرا میشه ولی هیچ نتیجه ای ازش حاصل نمیشه و مشخصات آهنگ هیچ تغییری نمیکنه.!!!!!
شما خودتون ازش جایی استفاده کردید؟ ممکنه یه بار هم شما تستش کنید؟
باز هم ممنون میشم اگه کمکم کنید.

سلام
دوست من میشه لینک منبع رو بزاری ؟
چون من کد #c رو میخوام
ممنون