PDA

View Full Version : ثبت نکردن اطلاعات در بانک



soraya_ayati
یک شنبه 17 شهریور 1392, 12:47 عصر
درود
می شه این ارور رو ببینید از چیه ؟
http://www.8pic.ir/images/00697577858731244226_thumb.jpg (http://www.8pic.ir/viewer.php?file=00697577858731244226.jpg)

شهابسلطانی
یک شنبه 17 شهریور 1392, 13:19 عصر
درود
می شه این ارور رو ببینید از چیه ؟
http://www.8pic.ir/images/00697577858731244226_thumb.jpg (http://www.8pic.ir/viewer.php?file=00697577858731244226.jpg)
دوست من
کدی که برای execute رو نوشتی به داخل if ببر
یعنی به یک ردیف بالاتر قبل از end if انتقالش بده
موفق باشی

soraya_ayati
یک شنبه 17 شهریور 1392, 13:31 عصر
این کارو کردم دوست من درست نشد !!

soraya_ayati
یک شنبه 17 شهریور 1392, 14:01 عصر
من فکر می کنم ایراد از کانورت کردنه .... چه جوری میتونم کانورت کنم ؟

hessam2003
یک شنبه 17 شهریور 1392, 14:01 عصر
سلام.
دیتابیس به بانک attach شده؟
با انجام کد بالا برنامه را REbuilt کنید.

Mani_rf
یک شنبه 17 شهریور 1392, 14:07 عصر
از یک کامپاننت تلریک استفاده کردی که الان نمیتونه اسمبلیش رو پیدا کنه. اگه احتمالا ویندوز عوض کردی و دوباره همه چی رو نصب کردی باید حواست باشه که باید دقیقا همون نسخه تلریکی که قبلا استفاده کردی رو نصب کنی وگرنه...

soraya_ayati
یک شنبه 17 شهریور 1392, 14:13 عصر
نه نه !! از این لحاظ می گم که من توع فیلدم در بانک Bigint چه جوری تکست بریزم توش ؟

soraya_ayati
یک شنبه 17 شهریور 1392, 14:15 عصر
از یک کامپاننت تلریک استفاده کردی که الان نمیتونه اسمبلیش رو پیدا کنه. اگه احتمالا ویندوز عوض کردی و دوباره همه چی رو نصب کردی باید حواست باشه که باید دقیقا همون نسخه تلریکی که قبلا استفاده کردی رو نصب کنی وگرنه...
بعله ویندوز عوض کردم مجددا ولی دفیقا همون تلریک رو نصب کردم ... باید چی کار کنم ؟

amirdifraxe1
دوشنبه 18 شهریور 1392, 11:08 صبح
دوست عزیز ابتدا شما کانکشن رو باز کن در ابتدای خط بهد if رو بردار درست میشه!

شهابسلطانی
دوشنبه 18 شهریور 1392, 11:23 صبح
سلام
مشکلتون حل شد؟

soraya_ayati
چهارشنبه 20 شهریور 1392, 10:02 صبح
اون مشکل حل شد ... دست همگی درد نکنه .... الان یه مشکل دیگه ای دارم اینه که من وقتی یه مقداری از Comobox انتخاب می کنم به جای این که مقدار رو در دیتاگرید نمایش بده ایندکس اون رو نشون می ده .... ممنون ...

شهابسلطانی
چهارشنبه 20 شهریور 1392, 15:50 عصر
دوست من
شما دیتا گریدتون رو با جدولتون ست کردید؟
کد های نمایش اطلاعات در جدول رو نوشتید؟(در صورت اتصال با کد)
مشکلتون رو واضح تر بفرمایید

soraya_ayati
پنج شنبه 21 شهریور 1392, 10:04 صبح
بعله ست کردم ... مثلا من دو مقدار دارم که cb من نشونش می ده مثلن 1 - قراردادی 2 - ساعتی
مثلن قراردادی رو انتخاب می کنم به جای این که قراردادی رو در دیتاگرید نمایش بده عدد 0 رو نشون می ده ... ممنون ...

شهابسلطانی
پنج شنبه 21 شهریور 1392, 11:39 صبح
حقیقتا زیاد متوجه نمیشم چی میفرمایید
در صورت امکان سورس رو بگذارید تا دوستان بیشتر بتونن کمک کنن
موفق باشی

شهابسلطانی
پنج شنبه 21 شهریور 1392, 11:42 صبح
یه چیز دیگه هم به نظرم رسید
احتمالا توی مقدار دهی به کمبو باکستون یکی از مقادیر رو نوشتید
برای مقدار دهی به کمبو باکس حتما 0 رو در نظر بگیرید
چونکه سی شارپ ایندکس هاش از 0 شروع میشن
اگه سورس باشه بهتر میتونم کمک کنم

soraya_ayati
سه شنبه 26 شهریور 1392, 12:26 عصر
الان کاملا منظورم رو می گم ...
Private Sub btn00_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn00.Click
Dim ResaultAdd As Boolean
If txt00.Text = "" Then
MessageBox.Show("لطفا عنوان پست سازمانی را وارد کنید")
txt00.Focus()
Exit Sub
End If
ResaultAdd = AddTbl23(txt00.Text, txt01.Text, txt02.Text, Convert.ToDouble(cb00.SelectedValue), txt03.Text)
Ps00(tbl23, tbl23da)
frmMoarefiPosthayeSazmani.dgv00.DataSource = tbl23
frmMoarefiPosthayeSazmani.txt01.Text = ""
frmMoarefiPosthayeSazmani.txt00.Text = ""
frmMoarefiPosthayeSazmani.txt03.Text = ""
frmMoarefiPosthayeSazmani.txt02.Text = ""
Dim Resault As DialogResult
If ResaultAdd = True Then
Resault = MessageBox.Show("پست سازمانی جدید ثبت شد ، آیا مایل به ثبت پست سازمانی دیگری هستید؟", "سوال", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Resault = Windows.Forms.DialogResult.Yes Then
txt00.Focus()
Else
MessageBox.Show("پست سازمانی ثبت نگردید")
End If
Else
Me.Dispose()
End If
End Sub

soraya_ayati
سه شنبه 26 شهریور 1392, 12:27 عصر
Public Function AddTbl23(ByVal clm00 As String, ByVal clm01 As String, ByVal clm02 As Integer, ByVal clm03 As Long, ByVal clm04 As String) As Boolean
Dim cmd As New SqlCommand
Try
cmd.CommandText = "Insert Into Tbl23(clm00,clm01,clm02,clm03,clm04) Values(@clm00,@clm01,@clm02,@clm03,@clm04)"
cmd.Parameters.AddWithValue("@clm00", clm00)
cmd.Parameters.AddWithValue("@clm01", clm01)
cmd.Parameters.AddWithValue("@clm02", clm02)
cmd.Parameters.AddWithValue("@clm03", clm03)
cmd.Parameters.AddWithValue("@clm04", clm04)
cmd.Connection = Con
If (cmd.Connection.State <> ConnectionState.Open) Then
cmd.Connection.Open()
End If
cmd.ExecuteNonQuery()
Return True
Catch ex As Exception
Return False
Finally
cmd.Connection.Close()
End Try
End Function

soraya_ayati
سه شنبه 26 شهریور 1392, 12:32 عصر
نتیجه ای که می گیرم
http://www.8pic.ir/images/34371665234019406518.jpg

soraya_ayati
سه شنبه 26 شهریور 1392, 12:33 عصر
الان واحد سازمانی من داره ایندکس نشون می ده توی دیتاگرید

Naghibi
سه شنبه 26 شهریور 1392, 12:47 عصر
این طوری که من متوجه شدم شما کد واحد سازمانی رو توی دیتابیس ذخیره میکنین (Convert.ToDouble(cb00.SelectedValue))

اگه می خواین گرید رو مستقیما به جدول بایند کنین باید به جای selectedvalue از selectedtext استفاده کنید تا عبارت واحد سازمانی در جدول ذخیره بشه
در غیر این صورت کافیه یه join با جدول واحدهای سازمانب بزنین و گرید رو به اون بایند کنین

soraya_ayati
چهارشنبه 27 شهریور 1392, 09:02 صبح
به Selectedtext : تبدیل می کنم این ارور رو می ده

http://www.8pic.ir/images/56820380348233574334.jpg

شهابسلطانی
چهارشنبه 27 شهریور 1392, 09:16 صبح
به Selectedtext : تبدیل می کنم این ارور رو می ده

http://www.8pic.ir/images/56820380348233574334.jpgپ



اروری که بهتون میده معناش اینه:
"رشته ورودی در یک قالب صحیح نبود"
حالا ببینید مشکل پس در string است
سورس باشه بهتر میتونم کمک کنم