تابع مبدل به باینری

[rezaei manesh]

سلام
چطوری میتونم یه استرینگ رو به صورت باینری توی بانک ذخیره کنم
متغیر که باینری رو نکه میداره چی خوبه تو ویژوال بیسیک دات نت
بانک من هم sql است
ممنون
::نوشتن:: :flower:

[M.GhanaatPisheh]

' Example of the Convert.ToByte( String ) and
' Convert.ToByte( String, IFormatProvider ) methods.
Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic

Module ToByteProviderDemo

Dim format As String = "{0,-20}{1,-20}{2}"

' Get the exception type name; remove the namespace prefix.
Function GetExceptionType( ex As Exception ) As String

Dim exceptionType As String = ex.GetType( ).ToString( )
Return exceptionType.Substring( _
exceptionType.LastIndexOf( "."c ) + 1 )
End Function

Sub ConvertToByte( numericStr As String, _
provider As IFormatProvider )

Dim defaultValue As Object
Dim providerValue As Object

' Convert numericStr to Byte without a format provider.
Try
defaultValue = Convert.ToByte( numericStr )
Catch ex As Exception
defaultValue = GetExceptionType( ex )
End Try

' Convert numericStr to Byte with a format provider.
Try
providerValue = Convert.ToByte( numericStr, provider )
Catch ex As Exception
providerValue = GetExceptionType( ex )
End Try

Console.WriteLine( format, numericStr, _
defaultValue, providerValue )
End Sub

Sub Main( )

' Create a NumberFormatInfo object and set several of its
' properties that apply to numbers.
Dim provider As NumberFormatInfo = new NumberFormatInfo( )

' These properties affect the conversion.
provider.PositiveSign = "pos "
provider.NegativeSign = "neg "

' These properties do not affect the conversion.
' The input string cannot have decimal and group separators.
provider.NumberDecimalSeparator = "."

Console.WriteLine( "This example of" & vbCrLf & _
" Convert.ToByte( String ) and " & vbCrLf & _
" Convert.ToByte( String, IFormatProvider ) " & _
vbCrLf & "generates the following output. It " & _
"converts several strings to " & vbCrLf & "Byte " & _
"values, using default formatting " & _
"or a NumberFormatInfo object." & vbCrLf )
Console.WriteLine( format, "String to convert", _
"Default/exception", "Provider/exception" )
Console.WriteLine( format, "-----------------", _
"-----------------", "------------------" )

' Convert strings, with and without an IFormatProvider.
ConvertToByte( "234", provider )
ConvertToByte( "+234", provider )
ConvertToByte( "pos 234", provider )
ConvertToByte( "234.", provider )
ConvertToByte( "255", provider )
ConvertToByte( "256", provider )
ConvertToByte( "-1", provider )
End Sub
End Module

' This example of
' Convert.ToByte( String ) and
' Convert.ToByte( String, IFormatProvider )
' generates the following output. It converts several strings to
' Byte values, using default formatting or a NumberFormatInfo object.
'
' String to convert Default/exception Provider/exception
' ----------------- ----------------- ------------------
' 234 234 234
' +234 234 FormatException
' pos 234 FormatException 234
' 234. FormatException FormatException
' 255 255 255
' 256 OverflowException OverflowException
' -1 OverflowException FormatException

[rezaei manesh]

سلام
دست شما درد نکنه
باید عالیه باشه
برم ببینم چی میشه
با تشکر فراوان
حامد ::نوشتن::
:flower:

[rezaei manesh]

سلام من نتونستم ازش استفاده کنم
من می خوام یه رشته مرکب از اعداد و کاراکترها را به باینری تبدیل کنم بعد توی بان ذخیره کنم تا کسی نتونه بخونه
لطفا بیشتر راهنمایی کنید
:گیج: :flower:

[M.GhanaatPisheh]

من می خوام یه رشته مرکب از اعداد و کاراکترها را به باینری تبدیل کنم بعد توی بان ذخیره کنم تا کسی نتونه بخونه
لطفا بیشتر راهنمایی کنید

کجای کد های بالا رو نفهمیدید؟
چرا Encrypt شون نمی کنید؟
راه درستی انتخاب نکردید. :)

[rezaei manesh]

من این ماژول رو به پروژم اضافه کردم اما
نتتونستم ازش استفائه کنم
لطفا یه نمونه کد بدین که از برنامه یه متنی رو به اون بده و اون باینری شو بده
ممنون
حامد
:flower: ::نوشتن::

[ehsan707]

زکات بی سوادی در دات نت به سراغ وی بی 6 رفتن است

[M.GhanaatPisheh]

object obj = Convert.ToByte("234");
MessageBox.Show(obj.GetType().Name + " " + obj.ToString());

توی Event
Double Click یه Button بذارش
اصل مطلب رو باید متوجه بشی.

یه Instance از نوع Object
که وقتی بهش مقدار دهی میشه شکل (Data Type ) اون مقدار رو به خودش می گیره
به این میگن LateBinding

MessageBox هم این مطلب رو نشون میده
یعنی نوعی که Instance از Object به خودش گرفته( همون Byte ی که می خواید)


تست کنید نتیجه رو گزارش بدبد.

موفق باشید

[rezaei manesh]

سلام
آقای قناعت پیشه من نتونستم با این کد درسا کار کنم -گویا-
من می خوام که یه رشته بدم و اون تابع رشته منو به صورت کد باینری به من بده و برعکس
این همون رشته رو به من میده ولی نوع اون عوض می کنه :گیج: :flower:

[M.GhanaatPisheh]

رشته منو به صورت کد باینری به من بده

دوست عزیزم
توی پست اولتون گفته بودید می خواید به صورت Binary توی پایگاه داده ای تون ذخیره بشه
به این نکته توجه کنید که هر داده ای به صورت باینری ذخیره می شه
شاید شما صفر و یکهای کاراکتر های یه string رو می خواید
شاید هم من درست متوجه منظورتون نمی شم.

اگر می خواید داده هاتون توی DataBase یه جوری ذخیره بشه که هر کسی نتونه اونو بخونه
این یه بحث دیگه می شه

[rezaei manesh]

سلام
شما درست فهمیدید من 0 و 1 کارراکتر های یه رشته رو می خوام برای اینکه بتونم اونا رو توی بانک ذخیره کنم
تا کسی به راحتی نتونه اونارو بخونه.
ممنون ار توجه جنابعالی
با تشکر فراوان
:تشویق: :flower: ::نوشتن::

[M.GhanaatPisheh]

کد زیر رو ببینید
ببینید توی یه فیلد کاراکتری چجوری دیتا میشینه



char MyChar = 'X'; // Character literal
char MyChar = '\x0058'; // Hexadecimal
char MyChar = (char)88; // Cast from integral type
char MyChar = '\u0058'; // Unicode

حالا کذ زیر رو ببینید
ببینید که هر کاراکتر در حقیقت توی کد های اسکی معرف چه عددی هست
یعنی معادل کاراکتر 'A' عدد 65 هست که این عدد 65 هست که بصورت Binary ذخیره میشه :


char c = 'A';
Console.WriteLine((int)c);

حالا اگر علاقه داری ببینید بصورت Hex چجوری می شه دیدش کد زیر رو ببینید :



char c = 'A';
Console.WriteLine("0x{0:x8} ",(int)c);

ببینید دوست عزیز
این کاراکتر توی همون فیلد کاراکتری بصورت Binary ذخیره شده
شما باید دو کار بکنید

1- دیدتون رو نسبت به بیت و بایت و نحوه ذخیره سازی اطلاعات ارتقاء بدید
2-برای اینکه کسی نتونه داده های شما رو از DataBase بخونه Data رو Encrypt کنید.

[rezaei manesh]

سلام
ممنون از توجه شما
اگر می شود

1- دیدتون رو نسبت به بیت و بایت و نحوه ذخیره سازی اطلاعات ارتقاء بدید
2-برای اینکه کسی نتونه داده های شما رو از DataBase بخونه Data رو Encrypt کنید.
اگر می شه در مورد دو کار بالا بیشتر توضیح بدید.
با تشکر فراوان
حامد :flower: ::نوشتن::