שלום שלום לכולם.
אני מפתח איזושהי מערכת עדכונים מזערית וקטנה וניסיתי לבנות לה טופס עדכון דרך הדפדפן.
אוקי, אז מיכוון שאני פחות מתכנת ויותר בעסקי העיצוב, נתקעתי קצת עם זה וישנה שגיאה.
הטופס הוא בעצם טופס שלקחתי ממערכת אחרת שלי מכיוון שלא היה לי את הכיוון הבסיסי איך לבנות והוא נתן לי אותו.
אז ככה:
טופס הקשר עם השרת:
קוד:
<!--#include file="CAForum/Connections/conn.asp" -->
<%response.Buffer=true%>
<html>
<head>
<title>CodeAvalanche</title>
<link href="CAForum/stylesheet/CAForum.css" rel="stylesheet" type="text/css">
</head>
<body>
<!--#include file="inc_header.asp" -->
<%
num = Request("parent")
dim datavalid
datavalid=false
if intnum="" then
if Request.Form("title")<>"" then
datavalid=true
else
datavalid=false
%>
<div class="Error">Please enter subject</div>
<br>
<%
end if
else
datavalid=true
end if
if request.FORM("nes")<>"" and datavalid=true then
datavalid=true
else
datavalid=false
%>
<div class="Error">Please enter your message text</div>
<br>
<%
end if
if datavalid=true then
DIM insertStr,strRedirectUrl
if num="" then
'MESSAGE
insertStr="INSERT INTO nes (title,nes,num) VALUES("
insertStr=insertStr & "'" & DATE() & "',"
insertStr=insertStr & "'" & Replace(Request.Form("title"),"'","''") & "',"
insertStr=insertStr & "'" & Replace(Request.Form("nes"),"'","''") & "',"
insertStr=insertStr & "'" & DATE() & "')"
else
'REPLY
insertStr="INSERT INTO nes (title,nes,num) VALUES("
insertStr=insertStr & num & ","
insertStr=insertStr & "'" & DATE() & "',"
insertStr=insertStr & "'" & Replace(Request.Form("nes"),"'","''") & "')"
end if
'response.write(insertStr)
'response.Flush
Set AddPostCmd = Server.CreateObject("ADODB.Command")
AddPostCmd.ActiveConnection = connStr
AddPostCmd.CommandText = InsertStr
AddPostCmd.Execute
if num="" then
%>
<div>
<p align="center">
ההודעה פורסמה בהצלחה
<BR>
<a href='http://www.gamix.co.il/newforum/forums.asp?iCat_id=2'>
למרכז התגובות לחצו כאן
</a>
</div>
<%
ELSE
%>
<div>
<p align="center">
ההודעה פורסמה בהצלחה
<BR>
<a href='http://www.gamix.co.il/newforum/forums.asp?iCat_id=2'>
למרכז התגובות לחצו כאן
</a>
</div>
<%
END IF
end if
%>
<table width="80%" align=center border="0" cellpadding="2" cellspacing="2" ID="Table4">
</table>
</body>
</html>
בכל מקרה, כנראה לא שיניתי שם את כל הנתונים ואני לא מוצא מה שגוי.
אני רוצה להכניס את השדות למסד GAMIXLs.mdb
שזה ייכנס לטבלת nes
והשדות יהיו title, nes, num
כאשר num זה מספר סידורי...
כנראה יש לי עוד שגיאה גם שאני לא מוצא בקוד... בשליחת נתונים.
אשמח ואודה מאוד למי שיעזור לי D=.
בברכה, אור שוורץ.