PDA

View Full Version : نوشتن اطلاعات فارسی در sqlserver



black_hat_jmone
جمعه 18 اسفند 1391, 10:40 صبح
سلام دوستان،من یک برنامه نوشتم که اطلاعات رو به بانک sqlserver اضافه می کنه اما موقع خواندن به جای حروف فارسی علامت؟؟؟؟؟ را قرار میدهد لطفا راهنماییم کنید

123s0ran
جمعه 18 اسفند 1391, 10:51 صبح
سلام دوست عزیز از قطعه کد های زیر استفاده کن البته منم تازه کار هستم و قبلا من هم همین مشکل داشتم اما با راهنمای دوستان درست شد . برای ثبت اطلاعات از کد زیر استفاده کنید که فونت های فارسی به علامت های ??? تبدیل نمی کنه.


Private Sub ok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button36.Click
Try
If TextBox1.Text = String.Empty Or TextBox2.Text = String.Empty Then
MsgBox("لطفاً نام و نام خانوادگی را بنویسید", MsgBoxStyle.Exclamation)
Exit Sub
End If
If CheckPersonExist(TextBox1.Text, TextBox2.Text, TextBox5.Text, ComboBox3.Text, ComboBox2.Text, TextBox6.Text, ComboBox1.Text, ComboBox4.Text) = False Then
If cnn.State = ConnectionState.Closed Then cnn.Open()
Try
cmd = New SqlCommand("Insert Into blit (name,fname,mabda,maqsad,sat,pelak,sandal,data) Values(@name,@fname,@mabda,@maqsad,@sat,@pelak,@sa ndal,@data) ", cnn)
With cmd
.Parameters.Clear()
.Parameters.AddWithValue("@name", TextBox1.Text)
.Parameters.AddWithValue("@fname", TextBox2.Text)
.Parameters.AddWithValue("@mabda", ComboBox1.Text)
.Parameters.AddWithValue("@maqsad", ComboBox2.Text)
.Parameters.AddWithValue("@sat", ComboBox4.Text)
.Parameters.AddWithValue("@pelak", ComboBox3.Text)
.Parameters.AddWithValue("@sandal", TextBox5.Text)
.Parameters.AddWithValue("@data", TextBox6.Text)
.ExecuteNonQuery()
End With
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Critical, "Error Happened For Add New Record")
End Try
ReloadRecord()
Else
MsgBox("مشخصات این شخص قبلاً در دیتابیس ثبت شده است")
End If
cnn.Close()
Catch ex As Exception
cnn.Close()
MsgBox("خطا در اتصال به دیتابیس")
Dim da As New SqlDataAdapter

Dim ds As New DataSet




End Try

vbamirvb
جمعه 18 اسفند 1391, 11:51 صبح
سلام
اگه ازدستورات sql استفاده می کنی با گذاشتن N در اول ' میتونی با فارسی کار کنی
example:
select * from tb1 where 'Namir'

swallow.pa
جمعه 18 اسفند 1391, 12:27 عصر
روي ديتابيس راست كليك و پروپرتيس بزن و كالكشن توي قسمت option ===collection === arabic_ci_as قرار بده ركوردهايي كه بعد از اين ثبت بشن درست ثبت ميشه