ايران ويج

نسخه‌ی کامل: PropertyBag در vb.net2005
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
صفحه‌ها: 1 2
من از اساتید یک سوال داشتم

ما توی ویژوال بیسک 6 چیزی به نام PropertyBag داریم

اما من نتونستم اونو توی vb.net 2005 پیدا کنم

با VBUpgrade هم جواب نداد

چه جوری این کد ها را می خوهیم در vb.net باز نویسی کنیم :

[/align]

Dim Data As New PropertyBag
Dim Temp As Variant
Data.WriteProperty "FName", "Iranvig"
Data.ReadProperty "LName"
Temp = Data.Contents
کسی بلد نیست؟؟؟؟

مهمه!!!
حرفه ای های VB.NET جواب بدهند
سلام
در وی بی دات PropertyBag وجود نداره
در نتیجه باید از serialization استفاده کنی.

موفق باشی
برای استفاده از این روش می تونی از کد زیر استفاده کنی :

ابتدا یک پروژه از نوع ClassLibrary بساز با اسم LoadClass
بعد کد زیر رو بنویس :

کد:
<Serializable()> Public Class classLoad
    Public MyDataRJ As String = "Arash RJ"
End Class

پروژه رو کامپایل کن (Build > Build LoadClass)


حالا یه پروژه جدید بساز و در پنجره پروژه روی نام پروژه راست کلیک کن و add Reference رو انتخاب کن .
از پنجره باز شده از سر برگ Projects یا Browse فایل dll که در مرحله قبل ساختی رو باز کن

روی فرم یک تکست باکس قرار بده و کد زیر رو در محل کد نویسی بنویس (راست کلیک رو فرم و انتخاب view code):

کد:
Imports System.IO
Imports System.Runtime.Serialization.Formatters.Binary

Public Class Form1
    Private myLoan As New LoanClass.classLoad

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If File.Exists("SavedRJ.bin") Then
            Dim myFileS As Stream = File.OpenRead("SavedRJ.bin")
            Dim deser As New BinaryFormatter()
            myLoan = CType(deser.Deserialize(myFileS), LoanClass.classLoad)
            myFileS.Close()
        End If
        TextBox1.Text = myLoan.MyDataRJ.ToString
    End Sub

    Private Sub Form1_Closing(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        myLoan.MyDataRJ = TextBox1.Text
        Dim myFileS As Stream = File.Create("SavedRJ.bin")
        Dim ser As New BinaryFormatter()
        ser.Serialize(myFileS, myLoan)
        myFileS.Close()
    End Sub
End Class

موفق باشی
من زیاد از این کدها چیزی نفهمیدم

مثلا اینا رو چه جوری می تونیم توی یک ویروس میکر و ویروسش استفاده کنیم
سلام
این کد که خیلی ساده بود و کاملا مشخصه چه کاری انجام میده.
البته تو این روش حتما باید یه فایل کمکی در کنار برنامه قرار بگیره .
فکر نکنم روش دیگه ایی وجود داشته باشه (چون تو وی بی راحت میشه اطلاعات رو به فایل چسبوند اما تو دات نت ....)

واقعا می خوای ویروس رو به زبان دات نت بنویسی ؟!!

موفق باشی
arashrj نوشته است:واقعا می خوای ویروس رو به زبان دات نت بنویسی ؟!!

مگه مشکلی داره؟؟؟؟؟ Question
سلام
یادش به خیر یه زمون ویروس رو با زبان اسمبل و سی می نوشتن . بعد وی بی اومد . حالا دات نت !!!!!
به نظر من دات نت به درد تنها کاری که نمی خوره ویروس نویسیه
حتما می خوای رو سیستم طرف Framework هم نصب کنی Rolleyes

موفق باشی
ممنون از راهنمای!

من یه ویروس میکر قوی دارم با VB6 می نویسم و برای اینکه قوی تر باشه از اسمبلی برای صدمه زدن به سخت افزار

استفاده می کنم البته کدهای اسمبلی را در ++VC می نویسم.

ولی سادگی Net آدمو جذب می کنه
امیدوارم ویروس خوبی باشه !
نوشتی به من هم بده تا آنتی شو بنویسم
البته من فقط نظرم رو در مورد دات نت گفتم .(که بهتره برای ویروس نویسی ازش استفاده نشه )

موفق باشی
صفحه‌ها: 1 2