View Single Post
ישן 21-04-08, 13:00   # 1
דור
אחראי קהילה
 
מיני פרופיל
תאריך הצטרפות: Oct 2005
גיל: 33
הודעות: 3,724

דור לא מחובר  

מערכת כתבות - 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>
articleform.asp -
קוד:
<%
	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

%>



הכתבה נשלחה בהצלחה
הצגת כתבות - main.asp
קוד:
<%
	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 "&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp"
		Response.write "<a href='article.asp?id='& R.fields ('id') &''>להמשך הכתבה</a>" + "<br>"
		R.movenext
		loop
		R.close
		set R=nothing
		
%>
ואחרון - article.asp - הדף של כתבה -
קוד:
<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=מספר הכתבה

תודה,
דור.
  Reply With Quote