درج و پاك كردن و نشان دادن ركوردها با ASP

pboy

pboy

Member
سلام من از توي يك كتاب آموزش ASP یک صفحه درست کردم که اطلاعات بانک اطلاعاتی رو نشون می ده. بار اول کار کرد ولی دوباره که ریفرش کردم دیگه نشون نداد!!!!
این هم کدش
کد: 
<% Option explicit%>
<!--#include virtual="adovbs.inc"-->
<HTML>
<body>
<%

dim objconn
set objconn = server.createobject("adodb.connection")
objconn.connectionstring= "DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=C:\Inetpub\wwwroot\db1.mdb"
ObjConn.Open
dim objrs
set objrs = server.createObject("ADODB.Recordset")
ObjConn.Open "Friends", Objconn, , adCmdTable
%>
<table align="center" border=1>
	<tr>
		<td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">ID</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Nick name</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Name</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Family</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Address</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Phone</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Fax</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Mobile</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Birthdate</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">E-mail</font></td><td>
        <p align="center"><b><font face="Tahoma" style="font-size: 8pt">Home page</font></td>
	</TR>
<%
Do while Not objrs.EOF
	Response.write "<TR><TD><B>" & objrs("ID") & "</B><BR></TD>"
	Response.write "<TD>" & objRS("nickname") & "<BR></TD>"
	Response.write "<TD>" & objRS("name") & "<BR></TD>"
	Response.write "<TD>" & objRS("fname") & "<BR></TD>"
	Response.write "<TD>" & objRS("address") & "<BR></TD>"
	Response.write "<TD>" & objRS("Phone") & "<BR></TD>"
	Response.write "<TD>" & objRS("Fax") & "<bR></TD>"
	Response.write "<TD>" & objRS("Mobile") & "<BR></TD>"
	Response.write "<TD>" & objRS("Birthdate") & "<bR></TD>"
	Response.write "<TD>" & objRS("email") & "<BR></TD>"
	Response.write "<TD>" & objRS("homepage") & "<BR></TD></tr>"
	'Move to the next ro, in the friends table
	objrs.movenext
loop
objrs.close
set objrs = nothing

objconn.close
set objconn = nothing
%>
</body>
</html>
یکی می تونه به من کمك كنه
راستی کد واسه درج یا پاک کردن رکورد ها چیه؟؟؟؟
یکی می تونه توضیح بده؟؟؟
ممنون
 
B

blackpen

Member
سلام عزيزم
شما يه لطفي بكن متن خطايي كه نشون داده ميشه يا عكس العملي كه سيستم نشون ميده ( پس از اجراي دستور) رو هم بنويس چون ظاهرا كد شما ايرادي نداره و بايد كار كنه
موفق باشيد
 
pboy

pboy

Member
اين ارور رو مي ده
[align=left:367977ca48]Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x72c Thread 0x990 DBC 0x149807c Jet'.
/show.asp, line 10[/align:367977ca48]
 
E

Ealireza

Member
ببين عزيز كد مشكلي نداره
دوتا علت ميتونه وجود داشته باشه
1- شما WebShairing نكرده باشيد
2- ارتباط شما در آبجكت objconn مشكل داره *
3- تيبل شما در بانك نباشه (خيلي ضعيف)

دومي خيلي مهمه
وقتي شما يك آبجكت استفاده ميكنيد بايد مطمئن باشيد كه درست ساخته شده !

سعي كن اين objconn رو به صورت ديگري تعريف كني
اصلا كد جالبي نبود ...
براي مثال اين آبجكت مشكلي نداره ...

کد: 
<%
db="C:\w3WEBS/RBX/DB/Main.MDB"
Set strCon= Server.CreateObject("ADODB.Connection")
adoCon= "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&DB
strCon.Open adoCon
%>
موفق باشيد
 
برای ارسال پاسخ شما باید وارد سیستم شوید.

آخرین مطالب مجیدآنلاین

جدیدترین ارسال ها

بالا