کمک فوری

[mosavi_M_K]

سلام دوستان خوبم
من در تاپیک دیگری مشکلم را مطرح کردم ولی نتیجه ای نگرفتم لطفا راهنماییم کنید

در برنامه دستور ذیل رادارم دستوری به من بگین درصورتیکه اگر نتیجه selectچیزی نبود دستوری را اجرا کند.

s = Me.connection.CreateCommand
s.CommandText = "select * from table where number ='" & Text2.Text "',serial=" & Text3.Text & "'"
??? =if s
then

end if

این کد را برای تست تکراری نبودن رکوردم قبل از ثبت میخواهم.:متفکر:

[art2000ir]

دقیقا مشکل شما چیه ؟ من متوجه نشدم
عنوان تاپیک هم مناسب نیست
کدها را در تگ کد بنویسد که درست نمایش داده شود

فکر می کنم منظور شما این است که اگر حاصل سلکت چیزی نبود یک دستور را اجرا کند
برای اینکار می توانید count را حساب کنید و اگر صفر بود یعنی چیزی پیدا نکرده است

If ds.Tables("securit").Rows.Count = 0 Then
MsgBox("شناسه کاربری معتبر نمی باشد")
ExitSub
EndIf

[Reza_Shamayel]

با عرض ادب و سلام خدمت همه عزیزان ...

دوست عزیز، میتونی برای این منظور دستور Select رو بصورت زیر بنویسی:


Select Count(*) RecordsCount
From table
Where (Number=5) And (Serial=10)
Group By Number, Serial


این Select با شرط Number=5 و Serial=10 کلیه رکوردهای جدول را فیلتر و با گروه بندی بر اساس Number و Serial تعداد رکوردها را در فیلدی بنام RecordsCount برمیگردونه. اگر هیچ رکوردی با شرط خواسته شده وجود نداشته باشه، مقدار فیلد RecordsCount برابر صفر خواهد بود وگرنه مقداری به غیر از صفر (عدد مثبت) در فیلد خواهد بود.

[mosavi_M_K]

دقیقا دستور شرطم را چگونه بنویسم لطفا کد آنرا بیان کنید فیلد recordscount کجاست؟