السلام عليكم
اخواني الاعزاء
الرجاء المساعدة في حل هذه المشكلة
الصفحة التي احاول بناءها وهي صفحة خاصة بالمشتركين في
الموقع لتحديد نوع الاخبار التي يريدونها والتي سأقوم
بوضعها في قاعدة البيانات ومن ثم تلقائيا ستظر الاخبار
في القسم الذي اختاروه فقط
ونص المشكلة التي تظهر هي
Microsoft JET Database Engine error '80004005'
The changes you requested to the table were not
successful because they would create duplicate values
in the index, primary key, or relationship. Change the
data in the field or fields that contain duplicate
data, remove the index, or redefine the index to
permit duplicate entries and try again.
/outpost1/myspace_custom_action.asp, line 19
اما بالنسبة للكود لهذه الصفحة فهو كالتالي
<%@ language = "vbscript" %>
<!--#include file="pagetop.txt" -->
<%
p_username = Request.Cookies
("isLoggedInAs")("username")
if p_username = "" then
%>
This area is only for registered members of primary
Outpost
Please <a href="login.asp">log in</a>. Thank you!
<%
else
Dim filePath
filePath = Server.MapPath("outpost.mdb")
Set outpostDB =
Server.CreateObject("ADODB.Connection")
outpostDB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & filePath
for each p_link_id in Request.Form("p_link_id")
sqltext = "insert into user_links(username, link_id)
values('" & p_username & "', '" & p_link_id & "')"
outpostDB.Execute(sqltext)
next
outpostDB.Close
set outpostDB = Nothing
end if
%>
<!--#include file="pagebottom.txt" -->
</body>
</html>
انا في الانتظار جزاكم الله خيرا
__________________
يا شعبي لو تدري شو صار ، سمسار باع الدار واحنا أهلها وأصحاب القرار
إبشري يا دار ، كل أولادك ثوار ، أقسموا بالله الواحد القهار منقذ نبينا من الغار على العودة مثل ألإعصار
نكوي العادي بالنار ، وما نخلي ولا سمسار
