21-04-08, 13:00
|
# 1 |
|
אחראי קהילה
|
מערכת כתבות - ASP
היי,
לאתר שאני עושה, אני צריך לעשות מערכת כתבות. כל כתבה יש לה כותרת, כותרת משנה, מאת, תוכן ותמונה. התמונה היא קישור ולא דרך העלאת קובץ. יש כמה בעיות: 1. ברגע שאני נכנס ל article.asp?id= זה לא כותב לי את הכתבה שצריך. 2. זה לא מציג לי את התמונה של כל כתבה - וזה קישור 3. אם אני רוצה לשלוח כתבה, אז אם אני כותב יותר מדי (ויותר מדי זה בערך 30 תווים) או משהו כזה, זה אומר לי שגיאה - שזה יותר מדי. המסד הנתונים שלי הוא אקסס (לא עובד עם מסד נתונים אחר) - יש אפשרות לעשות שהתוכן שיכנס יהיה יותר גדול? תודה אז ככה, הנה כל הקודים. טופס שליחת כתבה - קוד:
<html dir=rtl> <head> </head> <body link="blue" alink="blue" vlink="blue"> <font face="arial" size="2"> <!-- תחילת קוד הטופס --> <form name="myform" method="get" action="articleform.asp"> <table border="1" align="center"> <tr> <td> כותרת: </td> <td><input type="text" name="koteret" size="30"><br></td> </tr> <tr> <td> מאת: </td> <td><input type="text" name="do" value="צוות האתר" size="30"><br></td> </tr> <tr> <td> כותרת משנה / תקציר: </td> <td> <textarea name="tat" cols="100" rows="5"></textarea> </td> </tr> <tr> <td> תמונה: <font color="red">*קישור בלבד מאתרי העלאות קבצים</font> </td> <td> <input type="text" name="pic" size="60"> </td> </tr> <tr> <tr> <td> תוכן הכתבה: </td> <td> <textarea name="content" cols="100" rows="20"></textarea> </td> </tr> <tr> <td colspan="2" align="center"> <input type="submit" name="submit" value="שלח" onclick="bdika()"> <input type="reset" name="reset" value="נקה"> </td> </tr> </table> <!-- סיום קוד הטופס --> </form> </font> </body> </html> קוד:
<%
k=Request.QueryString("koteret")
m=Request.QueryString("do")
t=Request.QueryString("tat")
p=Request.QueryString("pic")
c=Request.QueryString("content")
sq="insert into article(koteret,do,tat,pic,content) values('"&k&"','"&m&"','"&t&"','"&p&"','"&c&"')"
path=Server.mappath("MY_Order.mdb")
set con= Server.createobject("ADODB.Connection")
con.mode=3
con.open "Provider=Microsoft.Jet.OLEDB.4.0;data source=" &path
con.Execute sq
%>
הכתבה נשלחה בהצלחה
קוד:
<%
sq="select * from article order by 'id'"
path=Server.mappath("MY_Order.mdb")
set con= Server.createobject("ADODB.Connection")
con.mode=3
con.open "Provider=Microsoft.Jet.OLEDB.4.0;data source=" &path
set R=con.Execute(sq)
do until R.eof
Response.write "<img src='& R.fields ('pic') &'>"
Response.write "<font size='5'>" & R.fields ("koteret") & "</font>" + "<br>"
Response.write "<b>" + "<font size='2'>" & R.fields ("tat") & "</font>" + "<br>" + "</b>"
Response.write "                                                                                                               "
Response.write "<a href='article.asp?id='& R.fields ('id') &''>להמשך הכתבה</a>" + "<br>"
R.movenext
loop
R.close
set R=nothing
%>
קוד:
<html dir=rtl> <head> </head> <body vlink="blue" alink="blue" link="blue"> <font size="2" face="arial"> <center> <h1> <%=k%> </h1> </center> <h2> <%=t%> </h2> <img src="<%=p%>" align="left"> <b>מאת: <%=m%> </b> <br> <%=c%> </font> </body> </html> כי לא הבנתי איך זה עושה שזה עושה דף אוטומטית לכל כתבה והאם הכתובת היא article.asp?id=מספר הכתבה תודה, דור. |
|
|
21-04-08, 16:25
|
# 2 |
|
הוסטסניון
|
בנוגע ל3..
תשנה את הסוג של השדה שאתה רוצה לכתוב בו טקסט ארוך ל"תזכיר" ולא ל"טקסט" ככה תוכל לכתוב טקסט ארוך בלי בעיה.. בנוגע לשאר.. אם תוכל להעלות את העבודה שלך לאיזה שרת חינמי ואני אראה אולי אני אוכל לפתור לך את הבעיה.. (קיבלתי בפרוייקט שלי 100 שנה שעברה היה ממש פשוט ועוד לא קיבלתי 2 משימות כמו ששאר האנשים מקבלים כי הבוחן אמר שהעבודה שלי מושלמת (; ) חג שמח.
__________________
 |
|
|
|
21-04-08, 19:43
|
# 3 |
|
אחראי קהילה
|
תודה רבה.
האמת שאין לי שתר חינמי אז ניתאי אשמח אם תיתן לי איזה שרת ואני אעלה, תודה. |
|
|
 |
| חברים פעילים הצופים באשכול זה: 1 (0 חברים ו- 1 אורחים) | |
|
|
עבור למצב קווי
