|
הרשם | ![]() |
שאלות ותשובות | ![]() |
רשימת חברים | ![]() |
לוח שנה | ![]() |
הודעות מהיום | ![]() |
חיפוש | ![]() |
|
![]() |
|
כלים לאשכול | תצורת הצגה |
![]() |
# 1 |
חבר בקהילה
|
זקוק לעזרה בטופס עדכון בסיס אקסס
שלום שלום לכולם.
אני מפתח איזושהי מערכת עדכונים מזערית וקטנה וניסיתי לבנות לה טופס עדכון דרך הדפדפן. אוקי, אז מיכוון שאני פחות מתכנת ויותר בעסקי העיצוב, נתקעתי קצת עם זה וישנה שגיאה. הטופס הוא בעצם טופס שלקחתי ממערכת אחרת שלי מכיוון שלא היה לי את הכיוון הבסיסי איך לבנות והוא נתן לי אותו. אז ככה: טופס הקשר עם השרת: קוד:
<!--#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=. בברכה, אור שוורץ. |
![]() |
חברים פעילים הצופים באשכול זה: 1 (0 חברים ו- 1 אורחים) | |
|
|