Printable View
سلام دوستان عزيز
من در ذخيره كردن اطلاعات يوزر و پسوردم در بانك اطلاعاتي اكسس مشكل دارم
از تكنولوژي asp استفاده ميكنم.
قطعه كدي كه براي ذخيره كردن استفاده ميكنم اينه:b.addnew
b("name")="mohsen"
b("family")="mohajer"
b.update
منتظر كمكتون هستم
متشكرم:11:
چرا با Asp کار می کنی با این زبان دیگه کسی کار نمیکنه
اینی که شما نوشتی به نظر درست میاد
ولی قبل و بعد از این هم باید یه چیزایی را بنویسی
کد کاملتو بزار ببینم چکار کردی
ضمنآ کدتو بزار تو تک <code> اونجوری بهتر میشه خوند
ما اين ترم درس مباني اينترنت داشتيم و استادمون با asp يادمون داد !نقل قول:
كدهايي كه بايد اين كار را برام انجام بدند اينها هستند:
<head>
<META http-equiv=Content-Type content="text/html;
charset=utf-8">
<% dim a,b
set a=server.createobject("adodb.connection")
set b=server.createobject("adodb.recordset")
a.open "provider=microsoft.jet.oledb.4.0; data
source="+server.mappath("login.mdb")
b.open "select * from log" ,a,3,3 %>
</head>
<body background="aks/Red_SD.jpg">
<% while not b.eof
request(b("username"))
request(b("password")&"<br>")
b.movenext
wend
b.addnew
b("username")="mohsen"
b("password")="mohajer"
b.update
b.close
a.close
set a=nothing
set b=nothing
%>من زياد مسلط نيستم . ممنون كه راهنماييم ميكنيد:11:
اینی که شما می خواید به نظرم سیستم عضو گیریه
ولی چرا اینجوری
اول از همه شما باید یه فرم ورودی اطلاعات داشته باشین برای وارد کردن یوزر و پسورد
یه کم ایراد داشت ولی من براتون یه سیستم عضو گیری گذاشتم ببینید به دردتون میخوره
ضمنآ این فایلی را که اینکلود(include) کردم را هم باید در wwwroot قرار بدید اگر پیداش نکردید یه سرچ توی درایو c بزنید پیدا میشهکد:<%@language=vbscript%>
<%option explicit%>
<!--#include virtual="adovbs.inc"-->
<%
'on error resume next
dim objconn
set objconn=server.createobject("adodb.connection")
objconn.provider="microsoft.jet.oledb.4.0"
objconn.open "آدرس بانک اطلاعاتیتون(البته باید در یکی از درایو ها باشد)"
dim objrs
set objrs=server.createobject("adodb.recordset")
objrs.open "users",objconn,,adlockoptimistic,adcmdtable
objrs.addnew
objrs("fname")=request.form("firstname")
objrs("lname")=request.form("lastname")
objrs("e_mail")=request.form("email")
objrs("usern")=request.form("username")
objrs("pasww")=request.form("password")
objrs.update
objrs.close
set objrs=nothing
objconn.close
set objconn=nothing
%>
ضمنآ این کد هنوز کامل نشده یعنی هنوزvalidate اش مونده ولی برای درج کردن تو بانک کافیه