ساخت یک صفحه لاگین

[mosyhey]

با سلام
ارتباط با دیتا بیس را این جوری برقرار کن ببین درست می شود:

filepath=Server.MapPath("data/db1.mdb")
Set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath

 

[rah]

سلام
این صفحه ی ثبت اطلاعات من:

<%
filepath=Server.MapPath("Data\db1.mdb")
Set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath

Set RS=Server.CreateObject("ADODB.RecordSet")

RS.Open "SELECT txt From Table1", conn

RS.Movefirst
RS.Addnew
RS ("txt") = Request.Form ("txt")
RS.update

conn.close
set conn=Nothing
RS.close
Set RS=Nothing

%>

 

[mosyhey]

هر چند اشکالی که از شما می گیرد مربوط نوع دیتابیس است و من نمی دانم مشکل شما حل شده یا نه ولی به جای 6 خط وسطی با این یک خط sql کار را امتحان کنید.

oConn.Execute "insert into table1 (txt) values ('salam')"

با اجرای صحیح این خط بایستی یک رکورد جدید در جدول table1 ایجاد شود که در فیلد txt آن نوشته salam.

 

[rah]

سلام

دستت درد نکنه. کار کرد.
فقط اول اینکه اگر بخوام محتویات چند آبجکت رو add کنم باید با این علامت , از هم جدا کنم؟
بعد در اینجا لازم نیست متد Update فراخوانی بشه؟
در ضمن در اینجا چگونه باید Request.Form فراخونی بشه؟

ممنون
بای

 

[mosyhey]

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

oConn.Execute "insert into table1 (name,age,marrid) values ('koorosh',2500,True)"

همان طور که می بینید طرفین اعدادی که در فیلد های از نوع Number می ریزید و همچنین مقادیر ترو و فالس که در فیلد های Yes/No می ریزید ' نمی خواهد.
شما کلاً از ADO بایستی به طرف SQL بروید تا پیشرفت کنید در بانک های اطلاعاتی. متن SQL که خیلی هم راحت و شبیه زبان انگلیسی است را بنویسید و طرفین آن را " بگذارید و با دستو اگزکیوت اجرا کنید. این متن SQL را می توانید از ترکیب متغیر ها هم بسازید مثلاً:

oconn.Execute "INSERT INTO table1 (txt) VALUES ('" & Request.Form("name") & "')"

در ضمن دیگر نیازی به Update و هیچ دستور ADO ی دیگری نیست.

 

[rah]

سلام من خواستم محتویات دو آبجکت رو به بانک اتصال بدم. اینزوری کردم. ولی غلط می گیره.
اون علامت &ها منو گیج کردن. ببینید جای request.form ها رو درست گذاشتم یا نه.

conn.Execute "INSERT INTO Table1 (txt, Name) VALUES ('" & Request.Form("txt") & Request.Form("Name") &"')"

تشکر
بای

 

[mosyhey]

سلام
& دستوری است که تکه های متنی و متغیر ها را به هم می چسباند و یک متن تحویل ما می دهد.
در خطی که شما نوشته اید بین دو مقدار Request.Form هم بایستی , بگذارید یعنی این طوری:

conn.Execute "INSERT INTO Table1 (txt,Name) VALUES ('" & Request.Form("txt") & "','" & Request.Form("Name") &"')"

 

[rah]

ممنونم
امتحان می کنم بهت می گم

 

[rah]

سلام

دوست عزیز، اطلاعات فرم را وارد بانک کردم.
فقط وقتی که بانک را open می کنم و تیبل مورد نظرمو انتخاب می کنم می بینم که اطلاعاتی که از طریق فرم وارد بانک شده با کاراکترهایی مانند: #&87765و&# و ... تبدیل شده و قابلین خوانده شدن از داخل فایل .mdb را ندارد؟
چکار باید کرد؟