مشكلة في قاعدة البيانات

ولماذا لا تقوم بوضع علامة صح عن طريق صفحات ال asp

بدلا من الطرق اليدوية ؟؟

بموقع brinkster اتذكر انه يجب انزال القاعدة اولا ثم التعديل عليها

ثم رفعها و الله اعلم ..

<%

Function IsValidated()

Set rsUser = objConn.Execute("SELECT * FROM links WHERE LinkID=" & Session("UserID"))

IsValidated = rsUser("Validated")

rsUser.Close

Set rsUser = Nothing

End Function

%>

تثبيت الروابط

<%

Set rsUsers = CreateObject("ADODB.Recordset")

Set rsUsers.ActiveConnection = objConn

rsUsers.LockType = 2

rsUsers.Open("links")

If Len(Request.QueryString("AddNew")) > 0 Then

Randomize

rsUsers.AddNew

rsUsers("Description") = Rnd() * 10000

rsUsers("ClickCount") = "ChangeClickCount"

rsUsers.Update

rsUsers.MoveFirst

End If

Do While Not rsUsers.EOF

Set rsRights = objConn.Execute("SELECT * FROM UserRights WHERE AdministrationUser=" & rsUsers("LinkID"))

strRights = ""

Do While Not rsRights.EOF

strRights = strRights & rsRights("Name") & ",

"

rsRights.MoveNext

Loop

%>

<%

rsUsers.MoveNext

Loop

rsUsers.Close

Set rsUsers = Nothing

rsRights.Close

Set rsRights = Nothing

%>

تثبيت الرابط

طيب اسمع .. ليش ما تعمل صفحة لتعديل البيانات او الحاله ..

مثلا تعمل عرض لكل سجل و له خلية خاصة تظهر مثلا على شكل

drop list بها خيارين yes or no و هما يدلان على رغبتك في اظهار او عدم اظهار علامة صح .. و عند عرض الرسائل اجعل هناك شرط في الاستعلام و هو ان تكون قيمة الحقل الذي اضفته تساوي yes ..

ما رأيك بهذه الفكرة ؟؟ (f) ;) :D :)