getdate

تابع (getdate) رو برای یکی از فیلدای بانکم (sql server)قرار دادم ولی هر دفعه که داده بهش میدم
کل فیلد رو تغییر میده و برای تمام رکوردها تاریخ فعلی رو برمیگردونه در صورتیکه مگه نباید با هر دفعه ورود اطلاعات تاریخ جاری خودش رو ذخیره کنه و به تاریخهای قبلی کاری نداشته باشه؟

تصور نمی‌کنم سوال شما ربطی به قسمت net. داشته باشه، با این حال توضیح می‌دید که منظورتون از قرار دادن تابع getdate برای یکی از فیلدهای بانکتون چیه؟ یعنی شما هر بار هنگامی که دستور INSERT رو اجرا می‌کنید، تابع getdate رو به عنوان یکی از فیلدها بهش می‌فرستید؟
می‌تونید ساختار جدول و query رو این جا بنویسید؟

ایلیا

نقل قول:

---

نوشته شده توسط Reticent

تصور نمی‌کنم سوال شما ربطی به قسمت net. داشته باشه، با این حال توضیح می‌دید که منظورتون از قرار دادن تابع getdate برای یکی از فیلدهای بانکتون چیه؟ یعنی شما هر بار هنگامی که دستور INSERT رو اجرا می‌کنید، تابع getdate رو به عنوان یکی از فیلدها بهش می‌فرستید؟
می‌تونید ساختار جدول و query رو این جا بنویسید؟

ایلیا

---

ممنون اون مشکلم حل شد ولی یه مشکل دیگه دارم
Cast from type 'DBNull' to type 'Integer' is not valid.این ارور چطور رفع میشه؟
زمانیکه پارامتر ورودیم رو nchar میدم این ارور رو میده?زمانیکه سام یه فیلد خاص رو با توجه به نامی که کاربر وارد میکنه به دست بیارم

مقدار برگشتی از queryتون null هستش، به خاطر همین نمی‌تونید به عدد صحیح castاش کنید. می‌تونید قبل از cast کردن چک کنید ببینید مقدار برگشتی DBNull هست یا نه. اگه query و code قسمتی که توش exception می‌ده رو بذارید، بیشتر می‌تونم کمک کنم.

ایلیا

نقل قول:

---

نوشته شده توسط Reticent

مقدار برگشتی از queryتون null هستش، به خاطر همین نمی‌تونید به عدد صحیح castاش کنید. می‌تونید قبل از cast کردن چک کنید ببینید مقدار برگشتی DBNull هست یا نه. اگه query و code قسمتی که توش exception می‌ده رو بذارید، بیشتر می‌تونم کمک کنم.

ایلیا

---

کد:

---

@summ int,@doctorr nchar
AS
begin

select  summ=sum  (recieve)
from TreatmentPrice
where doctor = @doctorr

end
RETURN @summ

-----------------------------------------------------------
Dim x as integer                                                                       
Dim myparam As New SqlParameter
        cmd1.Parameters.Add("@summ", txtsum.Text)
        cmd1.Parameters.Add("@doctorr", cmbdoc.Text)
        myparam.Direction = ParameterDirection.InputOutput

        Dim rdr As SqlDataReader
        rdr = cmd1.ExecuteReader
        Try
            While rdr.Read
                x = rdr.GetValue(0)
            End While
        Catch es As System.InvalidCastException
         
        Catch ex As System.Data.SqlClient.SqlException

            SqlConnection1.Close()
            rdr.Close()
        End Try
        txtsum.Text = x

---

زمانیکه به جای فیلد دکتر از فیلد کد که int هست استفاده میکنم کار میکنه

ممنون

به خاطر این نیست که شما myparam رو گرفتید، directionاش رو هم درست تنظیم کردید، ولی موقعی که خواستید summ رو به command اضافه کنید، یه چیز دیگه اضافه کردید؟
فکر می‌کنم کدتون باید به این شکل باشه:

کد:

---

        Dim summParam As New System.Data.SqlClient.SqlParameter("summ", txtsum.Text)
        summParam.Direction = ParameterDirection.InputOutput
        cmd1.Parameters.Add(summParam)

---

و اون myparam هم توی کد شما اضافه است.

ایلیا

از اینکه وقت میذارید جواب میدید ممنونم
اون ارور رو نمیده ولی جواب هم نمیده
ببینید من میخوام کاربرم نام هر پزشکی رو که از combobox انتخاب میکنه sumهمون رو ببینه
این کارو با انتخاب کد پزشک توسط کاربر تونستم انجام بدم با همون کدی که دیدید ولی وقتی در query فیلد انتخابیم رو از کد پزشک با نوع int به نام پزشک با نوع nchar تغییر میدم اون ارور رو میده

خواهش می‌کنم! فکر می‌کنم اشکال از encoding باشه چون حدس می‌زنم اسم پزشک‌ها فارسیه. نه؟
این خط رو بعد از مقدار دادن به Direction اضافه کنید:

کد:

---

summParam.SqlDbType = SqlDbType.NChar

---

تصور می‌کنم با این حل بشه. اگر مشکل حل نشد، پیشنهاد می‌کنم از همون کد پزشک استفاده بکنید. می‌تونید برای هر گزینه‌ای که در ComboBox قرار می‌دید، Text رو نام پزشک و Value رو کد پزشک مقداردهی کنید و SelectedValue رو به StoredProcedure بفرستید.

ایلیا

درسته نام پزشک فارسیه
کد نهایی :

کد:

---

Dim summParam As New SqlParameter("@summ", txtsum.Text)
            summParam.Direction = ParameterDirection.returnvalue
            summParam.SqlDbType = SqlDbType.NChar
            cmd1.Parameters.Add(summParam)
            cmd1.Parameters.Add("@doctorr", Me.cmbdoc.Text)

---

زمانیکهinputoutput باشه این ارور رو میده :
Formal parameter '@summ' was defined as OUTPUT but the actual parameter not declared OUTPUT.
که با قرار دادن بصورت returnvalue درست میشه
و در نهایت این ارور رو میده:
Procedure 'paccount' expects parameter '@summ', which was not supplied.
چرا؟

روحیه خوبی دارم ؟از رو نمیرم!!!!

شما دارید دو تا چیز رو با هم قاطی می‌کنید! وقتی یه چیزی رو با Return از توی Stored Procedure بر می‌گردونید، لازم نیست پارامتر باشه. Output Parameter یه چیز دیگه است. چطور من اصلا به این دقت نکردم؟ Summ رو از توی پارامترهاتون حذف کنید و توی Stored Procedure، به صورت متغیر (نه پارامتر) تعریفش کنید.
توی کد هم Stored Procedure رو به صورت ExecuteScalar به جای ExecuteReader اجرا کنید و مقدار برگشتی از Stored Procedure رو از اون بگیرید.
یا این که ExecuteNonQuery کنید و یه پارامتر از نوع ReturnValue بگیرید و بعدا مقدارش رو از طریق cmd1.Parameters["summ"].Value بگیرید. ExecuteReader برای موقعی خوبه که مقدار برگشتی مجموعه‌ای از سطرها باشه.

دلیلی هم نداره که از رو برید! من خوشحال می‌شم کمک کنم. :)

ایلیا

ممنمون شما لطف داريد

ببينيد ميخوام sum رو با ----- نام پزشک(فارسي) و محدوده تاريخی که کاربر وارد میکنه بدست بيارم و در
اختيار ش بذارم و علاوه بر اون با توجه به هر درصدي که کاربر وارد کرد بتونه اعمال شده درصد ورودي در sum رو هم به عنوان خروجي دريافت کنه.
با انجام تغييرات شما ممکنه؟

ميگم به جاي تحليل کد ناقص و احيانا غلط من ممکنه(لطفا) يه شبه کد با توضيحاتي که دادم برام ارسال کنيد.

متشکرم.

کد:

---

@doctorr nchar
AS
declare @summ int
select  summ=sum(recieve)
  from TreatmentPrice
  where doctor = @doctorr
RETURN @summ

-----------------------------------------------------------
cmd1.Parameters.Add("@doctorr", Me.cmbdoc.Text)
txtsum.Text = cmd1.ExecuteScalar().ToString()
SqlConnection1.Close()

---

حل شد؟ :)

ایلیا

حل نشد
نه error میده نه جواب !!به صورت کاملا منفعل فقط run میشه
مشکلش چیه؟

اگه doctorr رو یک SqlParameter بگیری و بهش تایپ NChar بدی و بعد به cmd1 اضافه کنی چی؟ (مثل اون کاری که قبلا اشتباهی برای summ کردیم).
اگه این جوری هم حل نشد، می‌تونی یه Backup از Database و یه مقداری از کد برنامه‌ات که بشه اجرا کرد رو یه جایی upload کنی (مثل rapidshare) تا من یه کم debugاش کنم؟ دیگه داره ناموسی می‌شه این مشکل ها!

ایلیا

upload کردم
.
Download-Link #1: [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

امیدوارم درست بشه :sad: :sad:
ممنون

دوست عزیز، اون کاری که آخر سر گفتم رو چک کردین؟ در ضمن Backup از Database رو upload نکردین.

ایلیا

این آدرس دیتا بیس

آقا من سرم یه کم شلوغ شده، هنوز نرسیدم برنامه‌ی شما رو چک کنم!

ایلیا

ممنون حل شد.

کجا بود؟

ایلیا

در نوع فيلد كه به varchar تغییر کرد ،در stored proc هم نیاز به return نبود و در code هم مثل قبل فقط با خذف direction .

راستی میدونید
زمانیکه توسط یک query سرچ روی دیتابیس انجام میشه چطور میشه نتیجه سرچ رو در یک دیتاگرید نمایش داد؟

نتیجه کد زیر رو علاوه بر txtbox در دیتاگرید هم بریزه

کد:

---


Dim con1 As New SqlConnection("Persist Security Info=False;Integrated Security=SSPI;initial catalog=Test;")
Dim cmd As New SqlCommand("SELECT * FROM T where Lname='" & txtLname.Text.Trim & "' ", con1)
con1.Open()
Dim y As Integer
Dim x, z As String

cmd.ExecuteNonQuery()
Dim rdr As SqlDataReader
rdr = cmd.ExecuteReader
Try
While rdr.Read
x = rdr.GetValue(2)
y = rdr.GetValue(0)
z = rdr.GetValue(1)

End While
Catch ex As System.FormatException

Finally
rdr.Close()
con1.Close()
txtid.Text = y
txtLname.Text = x
txtFname.Text = z

End Try

---

ممنون

کد:

---

myDataGrid.DataSource = rdr;
myDataGrid.DataBind();

---

ایلیا