<%@ Language=JScript %> <% // debug ? debug=false; // parameters ConnObj=Server.CreateObject("ADODB.Connection") ConnObj.Open(db) // fields etc // passwordloginmode ? passwordloginmode=false; // size textarea cols=50; size=cols; rows=20; // all names id=-1; // set "" for (i=0;ipoint 1:
<%} // special action action=""; sAction=""+Request.queryString("action"); if (sAction!="undefined") action=sAction; // modify if (action=="modify") { id=""+Request.queryString("id"); if (!isNaN(id)) { if (id!=-1001) aRecord=ConnObj.Execute("select * from "+table+" where ID="+id+" "); else aRecord=ConnObj.Execute("select * from "+table+" where date_create desc "); } if (debug) {%>point 2:
<%} // record. if (!aRecord.EOF) { id=""+aRecord("ID"); // get all for (i=0;ipoint 2:
<%} if (dispAType[i]=="") { // set to '' cdr=unescapesql(""+aRecord(dispA[i])); // replace \n !! etc cdr=replaceString(cdr,"\n","\\n"); cdr=replaceString(cdr,"\r","\\n"); cdr=replaceString(cdr,"\"","\\\""); cdr=replaceString(cdr,"'","\\'"); // replace correct function replaceString(wstr,astr,bstr) { xstr=wstr; ystr=""; cc=0; while (xstr.indexOf(astr)!=-1) { lx=xstr.indexOf(astr); if (lx!=-1) { ystr=ystr+xstr.substring(0,lx)+bstr; xstr=xstr.substring(lx+1); } ++cc; if (cc>100) break; } ystr=ystr+xstr; return ystr; } doc=dispA[i]+"=\""+cdr+"\";"; if (debug) {%>  #<%=doc%>
<%} eval(doc); } publish=""+unescapesql(""+aRecord("publish")); } } } %> eintrag: public interface :cyberfiction
< zurück
<% if (action=="") {%> <% }%> <% // button ---------------------- %> <% if (action=="") {%> <% }%> <% if (action=="modify") {%> <% }%> <% // input type=select display_description="Publishing:"; display_name="publish"; %> <% // parse & display for (i=0;i<%=i%>-<%=dispA[i]%>-<%=eval(dispA[i])%>-<%=dispA[i]%>-<%=dispAName[i]%><%} // input type=text if (dispAArt[i]=="") { display_description=""+dispAName[i]; display_name=""+dispA[i]; %> <% }%> <% // input picture if (dispAArt[i]=="picture") { display_description=""+dispAName[i]; display_name=""+dispA[i]; path=eval(display_name); %> <% }%> <% // input type=textarea if (dispAArt[i]=="textarea") { display_description=""+dispAName[i]; display_name=""+dispA[i]; %> <% }%> <% // input type=select if (dispAArt[i]=="select") { display_description=""+dispAName[i]; display_name=""+dispA[i]; %> <%}%> <% }%>

Eintragsfelder für die Hyperfiction-Listen
Die eingetragenen Texte werden auf einer separaten Seite dargestellt.
<%=display_description%>
<%=display_name%>
<%=display_description%> <% ncols=cols; nrows=rows; if (dispA[i]=="source") nrows=3; if (dispA[i]=="reception") nrows=5; %> Hinweis: Returns werden bei der Darstellung auf der Webseite (=publiziert) als Breaks (Zeilenumbrüche) dargestellt.
<%=display_description%>