Facebook
Twitter
RSS604
צפיות
צפיות
71
תשובות
תשובות
איך לומדים את השימוש בבסיס נתונים?
קראתי את כל מה שנכתב בנושא, ניסיתי, וללא הצלחה.
אפשר לקבל הכוונה?
בשלב הראשון, אני מעוניין לשלב באתר שלי אפשרות של רישום שם, טלפון, ואימייל של מי שמעוניין שאחזור אליו. כנראה שרק באמצעות בניית דוגמא שהיא צורך אבין משהו.
(קראתי את מדריך ה ASP ועל בסיס הנתונים, הכנתי בסיס נתונים של ACCESS עם מפתח, הגדרתי DSN בקיצור לא מצליח להתקדם..)
מוכן להתאמץ. אפשר לקבל הכוונה של מה שצריך לעשות?
71 תשובות
תציג את הקוד שניסית איתו להתחבר
למסד.
כתבתי בדף HTML קובץ שיש בו form
אני מבין ש FORUM מפנה לקובץ ASP שנמצא בשרת שתומך בASP שם נאגר המידע. הקשר למאגר הוא הקוד הזה שנמצא בטופס הHTML?
<%conn.Open "myDSN"%>
תראה את מה שניסית לעשות
ונסה להשתמש בחיבור DNS-LESS.
תראה את קוד ה-ASP שאמור לקבל נתונים מן הטופס שנשלח ולהכניסם לתוך מסד הנתונים (קוד רלוונטי).
זה מה שעשיתי עד עכשיו בהעתקה
יש לי 3 קבצים: אחד ASP כטופס הרשמה, השני קובץ ASP כטופס קליטת נתונים, והשלישי קובץ טקסט.
אחרי שקראתי אני עדיין מבין מעט מאוד מה עשיתי (בהעתקה).
אני מעוניין ללמוד לקבל את הפרטים בבסיס נתונים מסודר כמו אקסס, ולא בקובץ טקסט שקיבלתי עד עכשיו.
מבולבל מהפרטים
נראה לי שצריך לקבל את הנתונים האלה בקובץ האקסס.
מצורף קובץ טקסט עם מה שהשתמשתי עד עכשיו
הכנתי את קובץ האקסס
איך אני משדרג??
תודה על הנכונות
אוקי
אני מניח שאתה לא יודע SQL ועבודה עם מסד נתונים.
תצטרך לבנות לולאה שתעבור על כל הקובץ שמכיל את הפרטים ויוסיף את הנתונים לטבלה במסד.
תצטרך ללמוד SQL ולא רק כיצד לבנות מסד אקסס.
צריך ידע גם ב-ASP ו-VBS.
קראתיעל SQL . לא עזרת לי
אני מציע לך
לנסות מדריכים כמו בנית פורום/מערכת תגובות
תוכל לימצוא במאמר
כאן
אם אתה משתמש בasp
תוכל לילמוד מכאן
asp.org.il
אם php
אז מכאן
http://www.php-il.net
איך מגדירים חיבור לשרת (לא אישי)
אני לא רואה את האפשרות לשנות את ה DSN של המערכת לשרת חיצוני.
או אולי צריך לסמן DSN של קובץ? יש אופציה כזו.
ניסיתי על השרת האישי ולא עובד בגלל הסיבה הזו:
There are too many people accessing the Web site at this time.
לא מבין איך זה אפשרי.
<%
Dim objCon
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.ConnectionString = "mydsn"
ObjCon.open
conn.Execute "UPDATE SiteUsers SET fname='shimon'"
ObjCon.close
Set objCon = nothing%>
DNS-LESS
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("yourDB.mdb")
חיבור למסד הנתונים לפי נתיב המסד.
ה MAPPATH לא נכון
אני ממש כותב את הכתובת במקום ה your db.mdb שמתחילה ב http וכן הלאה ?
מישהו יכול לכוון?
למה אני מקבל שגיאה?
<%
Dim objCon
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("..mdb_filesmydb.mdb")
conn.Execute "UPDATE SiteUsers SET fname='shimon'"
ObjCon.close
Set objCon = nothing%>
בשורת הקוד
כתבתי בשם המסד "yourDB" רק לשם הדוגמא.
במידה והמסד נמצא בתקיה נוספת צריך לכתוב סלאש לכיוון ההפוך (/).
Server.MapPath("../mdb_files/mydb.mdb")
אני לא יודע באיזו תקיה המסד בדיוק נמצא והיכן הקבצים שלך נמצאים.
להבא, תיישר את הקודים שלך לשמאל.
נראה שמתחבר אבל משהו לא תקין
מה לא בסדר עכשיו?
<div style="margin-right:2cm;margin-left:2cm;font-size:15px;color:#003399"><BR>
ùí ôøèé: <%=request.form("fname")%><br><BR>
ùí îùôçä: <%=request.form("lname")%><br><BR>
èìôåï: <%=request.form("phone")%><br><BR>
Email: <%=request.form("email")%><br><BR>
<%
Dim objCon
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../mdb_files/mydb.mdb")
SQLstr="INSERT INTO SiteUsers (fname,lname,phone,email) VALUES ('"
SQLstr = SQLstr & Request("fname") & "','"
SQLstr = SQLstr & Request("lname") & "','"
SQLstr = SQLstr & Request("phone") & "','"
SQLstr = SQLstr & Request("email") & "')"
conn.Execute SQLstr
ObjCon.close
Set objCon = nothing%>
עד כאן
וזה מה שאני מקבל
Microsoft VBScript runtime error '800a01a8'
Object required: "
/feedback.asp, line 37
תיישר לשמאל.
אגב, בשורה
conn.Execute SQLstr
אתה צריך לשנות את conn לשם האובייקט שלך (ObjCon).
זה אומר שכל מקום שמופיע SQLstr
אני אמור לשנות ל ObjCon?
ועוד משהו, איפה ההתייחסות לאקסס?
אני בסוף עוד אבין משהו.
לגבי היישור לשמאל- אצלי מיושר לשמאל. אני פשוט מעתיק ולוחץ alt+shift
אולי לא הבנת
המשתנה SQLstr אצלך הוא השאילתה שאתה עומד לבצע בעזרת אובייקט החיבור ObjCon של המסד.
כשאתה יוצר אובייקט חיבור/רקורדסט אתה נותן לו שם.
לפי אותו שם אתה צריך לכתוב את הקוד שלך.
במידה וקראת לו conn אתה תבצע את השאילתות שלך לפי אותו שם ואם קראת לו ObjCon אז תבצע את השאילתות שלך לפי אותו השם.
conn.Execute SQLstr
ObjCon.Execute SQLstr
אולי עדיין אתה צריך לעבור על מדריך SQL ולהבין כיצד מוסיפים נתונים למסד וכו'.
אתה יכול להשתמש ב-ADO שזה בעיקרון יותר קל ופשוט למתחילים (כתבתי מאמר על כך באתר).
בנוגע ליישור לשמאל, זה לא עוזר. אתה צריך להציג את הקוד כקוד פורום ולא טקסט.
תלחץ על הכפתור הסמוך לתמונת הסמיילי בהוספת הודעה (אייקון של שורות) ותשים את הקוד שלך בין התגיות שהכפתור יוסיף לך ולחיצה נוספת עליו תחזיר את כיוון הטקסט לעברי.
רק אולי לא הבנתי? לא הבנתי
אשמח לקרוא את המאמר.
אני מתכוון לחזור על הSQL שקראתי ואני רחוק ביישום.
הכתיבה שמתייחסת לSQL "מטפלת" גם באקסס?
נתתי מבט ב SQL ולא מבין מה צריך לתקן.
Dim objCon
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../mdb_files/mydb.mdb")
SQLstr="INSERT INTO SiteUsers (fname,lname,phone,email) VALUES ('"
SQLstr = SQLstr & Request("fname") & "','"
SQLstr = SQLstr & Request("lname") & "','"
SQLstr = SQLstr & Request("phone") & "','"
SQLstr = SQLstr & Request("email") & "')"
conn.Execute ObjCon
הצלחתי להכניס נתונים
תודה על הסבלנות
עכשיו אני בודק אם נאגרו בבסיס הנתונים לוודא שאכן הצליח, כי לא נרשמה שגיאה.
שפת ה-SQL
היא שפה שנועדה לקשר בין ה-ASP אל מסד הנתונים.
עימה תוכל להוסיף,לעדכן ואף למחוק נתונים מתוך המסד.
תודה תודה. הנתונים נאגרו. ועכשיו?
איך אני רואה את הנתונים שנאגרו שבתוך בסיס הנתונים?
האם צריך טופס שיקרא לטופס ASP שבו יש פקודת SELECT ? כמו זו? או שיש דרך אחרת?
<%
Dim objCon
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../mdb_files/mydb.mdb")
SQLstr="SELECT * FROM SiteUsers"
ObjCon.Execute SQLstr
ככה
SQLstr="SELECT * FROM SiteUsers"
Set rs = ObjCon.Execute SQLstr
If not rs.EOF Then
Do while not rs.EOF
Response.Write rs("field") & "<br>"
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
אני צריך בשביל זה דף ASP
באיזה פורמט אני כותב את זה?
יש אפשרות באופן ישיר יותר?
סליחה על הבורות.
SQL זו שפה שנועדה לעבודה מול/עם מסדי נתונים. זה שאתה יכול לעבוד איתה דרך ASP זה רק בגלל שתיכנתו לך "API" שמתממשק למסד.
אתה יכול לעבוד עם מסדי נתונים דרך כל שפה שתוכנת לה "API" להתקשרות עם מסדי נתונים.
כל קוד שכתוב ב-ASP
דורש עמוד בסיומת ASP עם תמיכה ב-ASP.
למה הכוונה "איזה פורמט"?
אין אופן ישיר יותר.
יש לך 2 אפשרויות:
1. כמו שכתבתי לך.
2. יצירת אובייקט רקורדסט ולהעביר לולאה כמו בקוד הקודם.
מה לא בסדר עכשיו?
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/check.asp, line 24
Set rs = ObjCon.Execute SQLstr
מהו כל הקוד הרלוונטי (מהשאילתה)?
אני מבין שזה?
SQLstr="SELECT * FROM SiteUsers"
ואם כן למה אתה חותר?
צריך את כל הקוד הרלוונטי
החל מהשאילתה ועד סוף הקוד הנוכחי.
השגיאה שמופיעה לך בד"כ מצביעה על כך שלא סגרת משפט תנאי.
מה לא סגרתי?
איך אני אדע
כשאתה בכלל לא מציג קוד רלוונטי ??
—> שירשרתי מהודעתך הראשית מחדש
אתה יודע מה המטרה שלי
הרי אני מתקדם בהדרכתך
הנה הכל:
<html>
<head>
<title>feedback</title>
<META http-equiv=Content-Type content="text/html; charset=windows-1255" />
<basefont face=david size=4 color=#000099>
</head>
<BODY text=white vLink=blue link=blue dir=rtl>
<div style="margin-right:1cm;margin-left:2cm;font-size:15px;color:#003399"><BR>
ùìåí <%=request.form("fname")%>
</div>
<TABLE height=50px>
<TR>
<TD> </TD>
</TR>
</TABLE>
<CENTER><FONT SIZE="5" COLOR="#FF0000">äîéãò ðùîø<BR>åúåãä òì ùéúåó äôòåìä</FONT></CENTER>
<div style="margin-right:2cm;margin-left:2cm;font-size:15px;color:#003399"><BR>
ùí ôøèé: <%=request.form("fname")%><br><BR>
ùí îùôçä: <%=request.form("lname")%><br><BR>
èìôåï: <%=request.form("phone")%><br><BR>
Email: <%=request.form("email")%><br><BR>
<%
Dim objCon
Set ObjCon = Server.CreateObject("ADODB.Connection")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../mdb_files/mydb.mdb")
SQLstr="INSERT INTO SiteUsers (fname,lname,phone,email) VALUES ('"
SQLstr = SQLstr & Request("fname") & "','"
SQLstr = SQLstr & Request("lname") & "','"
SQLstr = SQLstr & Request("phone") & "','"
SQLstr = SQLstr & Request("email") & "')"
ObjCon.Execute SQLstr
ObjCon.close
Set objCon = nothing%>
</div><BR></body>
</html>
אני לא רואה
את שורת הקוד שציינת בהודעתך הנוכחית.
זה מה ששמתי
<%
SQLstr="SELECT * FROM SiteUsers"
Set rs = ObjCon.Execute SQLstr
If not rs.EOF Then
Do while not rs.EOF
Response.Write rs("field") & "<br>"
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing%>
נסה כך
<%
Set rs = Server.CreateObject("ADODB.RecordSet")
SQLstr="SELECT * FROM SiteUsers"
rs.Open SQL, ObjCon
If not rs.EOF Then
Do while not rs.EOF
Response.Write rs("field") & "<br>"
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
%>
השדה field הוא סתם שדה שנמצא בטבלה שלך (לשם הדוגמא) כך שתצטרך לשנותו לשדה/ות הקיימים אצלך בטבלה.
מציג את הדף ללא תקלה
אבל ללא הנתונים
2 אפשרויות
1. הטבלה ריקה.
2. אתה מנסה להדפיס נתונים שאין בהם ערכים בטבלה.
בוודאות יש נתונים בטבלה
נכנסתי לשרת ובדקתי
הנה אני מצרף אותה.
מה אני לא עושה נכון?
אני מכניס את קובץ הASP לשרת שתומך, ואז אני רושם את הכתובת של הקובץ הזה. אולי יש בעיה בדרך?
יש כתובת לעמוד?
מה מוצג לך בעמוד? עמוד ריק?
מה הקוד הנוכחי שלך (לאחר שינוי שמות השדות)?
אני רואה שאין תגובה כלל
לסקריפט ASP. אבל יש מלה שנכתבה בHTML.
בראש הדף חייב להיות ההכרזה הזו?
<%@ Language=VBScript%>
ראה את התחלת מבנה הדף
<%@ Language=VBScript%>
<html>
<head>
<title>feedback2</title>
<META http-equiv=Content-Type content="text/html; charset=windows-1255" />
<basefont face=david size=4 color=#000099>
</head>
<BODY text=white vLink=blue link=blue dir=rtl>
<div style="margin-right:1cm;margin-left:2cm;font-size:15px;color:#003399"><BR>
ùìåí <%=request.form("fname")%>
</div>
אין לשורה הזו קשר לקוד והיא לא חובה
אז מה הפתרון?
עדיין לא ממש הגבת
.
עניתי והראיתי לך את מבנה הדף
מוצג רק מה שאני כותב בHTML ושום דבר אחר לא. מובן שגם הנתונים מהאקסס לא מופיעים.
מה עם קישור ?
זה בשרת או במחשבך?
בעיקרון הקוד תקין.
השאר תלוי בך (לבדוק מה לא טוב).
הנה זמני. ראה
http://www.neot-reut.org.il/feedback2.asp
יש לך שגיאה
ואתה אפילו לא שם לב ?
מה זה בתחתית קוד המקור בעמוד שלך?
זו שגיאה.
תציג את שורות 24-30 ותדגיש את שורה 27.
חחח בדיוק באתי לרשום את זה…
הנה השגיאה
ADODB.Recordseterror '800a0bb9
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another
feedback2.asp line 27
יישמע לך מוזר
"תציג" "תדגיש" אלה מלים שאני עדיין לא יודע מה לעשות אתם.
אני רק מתחיל. ואולי בכל זאת אתה מתכוון למשהו שאני כבר יודע?
בקיצור מה זה? תודה
התכוונתי
שכאשר אתה מציג קוד שמיושר לשמאל, פשוט תסמן את שורה 27 (לפי הקוד שלך) ותלחץ בהוספת ההודעה על הכפתור "B" על מנת שהשורה תהיה מודגשת (בולטת).
אהה
<%
Set rs = Server.CreateObject("ADODB.RecordSet")
SQLstr="SELECT * FROM SiteUsers"
rs.Open SQL, ObjConIf not rs.EOF Then
Do while not rs.EOF
Response.Write rs("fname") & "<br>"
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
%>
שמע
אתה חייב אבל חייב לעבור על מדריך SQL וגם ASP.
השגיאות שלך כל כך ברורות ואתה לא יודע מהן.
אי אפשר לעזור כשהבן אדם לא יודע ידע בסיסי.
צודק….
אני לא יודע אם לצחוק או לבכות
בוא אני אתן לך רמז
שורה הקוד :: SQLSTR
קריאה למסד :: SQL
תסיק מסקנות
וכמו שבילד אמר תעבור על ASP ו SQL ו (vbs/js -איזו שפה שאתה מעדיף)
מקבל שצריך לעבור עליהם שוב
ולפני אני עובר לשם מה בכל זאת הבעיה?
סנופ כתב לך את הבעיה
ניסית לבצע את השאילתה SQL כאשר היא לא קיימת ויש לך את SQLstr.
שיניתי ולא עובד
זיהיתי וניסיתי עם השינוי הזה, ולא עובד
rs.Open SQLstr, ObjCon
———->>> עכשיו השגיאה
היא בשורה 18.
תציג שורות 15-21 ותדגיש את שורת 18.
ייתכן ששיניתי
<%
Set rs = Server.CreateObject("ADODB.RecordSet")
SQLstr="SELECT * FROM SiteUsers"
rs.Open SQLstr, ObjCon
If not rs.EOF Then
Do while not rs.EOF
Response.Write rs("fname") & "<br>"
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
%>
תבדוק את החיבור שלך למסד
עכשיו אני רואה שאין כל חיבור למסד
תראה עכשיו:
<%
Set ObjCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
ObjCon.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../mdb_files/mydb.mdb")
SQLstr="SELECT * FROM SiteUsers"
rs.Open SQLstr, ObjCon
If not rs.EOF Then
Do while not rs.EOF
Response.Write rs("fname") & "<br>"
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
%>
זה עובד
רק שזה לא מוצג.
תבדוק טוב טוב את הקוד שלפני כל הפלט שהדפסת כיוון שכנראה משהו חוסם ממנו להיות מוצג.
אני רציני לא יודע….
אם לצחוק או לבכות
נתת להם צבע לבן לכן לא רואים אותם על פני הדף …. ורק בקוד מקור
אייייי ייייי ייייי אולי כדאי שתעבור קצת על מדריך ה HTML
לילה טוב וחג שמח נועם צברי
זה עובד. המאמץ המאמץ היה כדאי
איתרתי את הבעיה. תודה.
אמשיך לקרוא ואנסה אפשרויות חדשות.
ושוב תודה על הסבלנות
עדיין לא מצליח לפתוח טבלה שלמה
בהדרכה זה נראה פשוט, אז למה לא מצליח לפתוח טבלה שלמה?
אחרי "ההצלחה הקודמת" קוויתי לפתוח להצליח. הכל הולך קשה. שיבצתי את שם הטבלה, ולא מצליח לשלוף אותה.
הנה זה לקוח מתוך המדריך:
SELECT *
FROM tblName
לא הבנתי
מה בדיוק לא מצליח או לא עובד לך.
מה אני אמור להבין מהשאילתה שכתבת?
תציג קוד רלוונטי ושגיאה (במידה ויש).
אני לא מצליח לפתוח
את כל הטבלה
למה למה למה
הנה
<%
Dim ObjCon, rs, SQLstr
Set rs = Server.CreateObject("ADODB.Recordset")
ObjCon.Open "..mdb_filesmydb.mdb"
SQLstr="SELECT * FROM SiteUsers"
rs.Open SQLstr,ObjCon
rs.Close
Set rs = Nothing
%>
תגובה
אתה צריך דוקם כל ליצור חיבר למסד נתונים ואחר כך לשים את הרשומות בתוך RecordSet
נסה ככה:
Dim ObjCon, rs, SQLstr
Set ObjCon = Server.CreateObject("ADODB.connection")
ObjCon.Open "DRIVER={Microsoft Access Driver (*.mdb)};
DBQ=" & Server.MapPath("md-filesmymdb.mdb")
SET rs = Server.CreateObject("ADODB.Recordset")
SQLstr="SELECT * FROM SiteUsers"
rs.Open SQLstr,ObjCon
rs.Close
Set rs = Nothing
הדיון הסתיים
אחרי שתעבור על כל המדריכים שאתה צריך תחזור ואעזור במה שצריך.
כבר קרה שהיה מישהו דומה לך שפשוט לא למד ואח"כ קיבל השעיה כיוון שהוא כתב הודעות על שגיאות פשוטות שכל אחד צריך לדעת.
אתה טועה לגבי
אני מנסה להיצמד למדריך SQL של "guides4u" ומנסה להיצמד להצעות שבו. וגם עם מדריכי האתר פתוחים.
ונכון יש גם טעויות.
חשבת שאולי ההדרכה לא ברורה?
גם ההצעה האחרונה שאותה ניסיתי לא עבדה.
אוקי
אם ההדרכה לא טובה אז מחפשים מקום שיתאים ויהיה טוב.
תראה את גודל הדיון ועל מהו? על כלום.
העניין הוא שצריך ללמוד ולהתנסות
אחרי שלומדים מדריך זה לא אומר שתדע לעשות הכל אלא פשוט תדע מה שלמדת.
יש אתרים נוספים שניתן ללמוד מהם כמו .
ועוד טיפ קטן….
הדרך הכי טובה ללמוד, היא לפתור את הבעיה לבד. אם אתה נתקע במשהו, תחפש בגוגל מאמר שיסביר לך איך לפתור את הבעיה. אתה תראה שאתה תרחיב מאוד את אופקיך משום שתוך כדי אתה תקרא עוד ועוד נושאים.