post til base evt med array

at smække det ind i et array og så lave et loop der laver poster indholdet af det array til det er tomt....ja !

Det er en god måde at gøre det på

ok hehe
har du evt et eksempel? jeg er ikke en haj til det her nemlig hehe

forresten menes der at den skal vises 5 forskellige historier på siden eller skulle det gemme i databasen ?

den skal bare gemme det i basen
så det ser sådan her ud

ID OVERSKRIFT  HISTORIE  FORFATTER
1  overskrift1 historie1 forfatter1
2  overskrift2 historie2 forfatter2
osv osv

'Åben connection til din database:
conn.open "bal balbal"


for i = 1 to 5 do
  overskrivft = Resuest.Form("overskrift"&i)
  historie = Resuest.Form("historie"&i)
  forfatter = Resuest.Form("forfatter"&i)
  overskrivft = replace(overskrivft,"',"''")
  historie = replace(historie,"',"''")
  forfatter = replace(forfatter,"',"''")
  strSQL = "INSERT INTO tabelnavn (overskrift, historie, forfatter) VALUES ('" & overskrivft & "', '" & historie  & "', '" & forfatter & "')"
  conn.execute (strSQL)
next


Det er godt nok ikke med array men det er et loop..

ok jeg fik den her fejl
"expected end of statement line 5 column 16"

her er koden:

<%@ Language="VBSCRIPT" %>
<% Response.buffer = True %>
<!--#include file="include/dbconn.inc"-->
<%
for i = 1 to 10 do  <---- linie 5
  overskrift = Request.Form("overskrift"&i)
  broedtekst = Request.Form("broedtekst"&i)
  dato = Request.Form("dato")
  start = Request.Form("start"&i)
  duration = Request.Form("duration"&i)
  overskrift = replace(overskrift,"',"''")
  broedtekst = replace(broedtekst,"',"''")
  nSQL = "INSERT INTO news (headline, story) VALUES ('" & overskrift & "','" & broedtekst & "')"
  Conn.Execute(nSQL)
  sSQL = "INSERT INTO stream (dato, start, duration) VALUES ('" & dato & "','" & start & "','" & duration & "')"
  Conn.Execute(sSQL)
next
%>

hmm fik løst problemet ved at fjerne do
men nu kommer den med den her fejl:
Error Type:
Microsoft VBScript compilation (0x800A03EE)
Expected ')'
/stream/opret.asp, line 11, column 36


her er koden:

<%@ Language="VBSCRIPT" %>
<% Response.buffer = True %>
<!--#include file="include/dbconn.inc"-->
<%
for i = 1 to 10
  overskrift = Request.Form("overskrift"&i)
  broedtekst = Request.Form("broedtekst"&i)
  dato = Request.Form("dato")
  start = Request.Form("start"&i)
  duration = Request.Form("duration"&i)
  overskrift = replace(overskrift,"',"''")  <--- linie 11
  broedtekst = replace(broedtekst,"',"''")
  nSQL = "INSERT INTO news (headline, story) VALUES ('" & overskrift & "','" & broedtekst & "')"
  Conn.Execute(nSQL)
  sSQL = "INSERT INTO stream (dato, start, duration) VALUES ('" & dato & "','" & start & "','" & duration & "')"
  Conn.Execute(sSQL)
next
%>

der mangler en " i linie 11 sådan her:
overskrift = replace(overskrift,"'","''")  '<--- linie 11

det samme i linie 12:
broedtekst = replace(broedtekst,"'","''")