Page 1 of 2 12 Last
  1. #1
    Wover's Avatar
    Registered
    27/12/03
    Location
    Tallinn, Estland
    Posts
    7,622
    iTrader
    40 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/15

    PREVIEW: Buy & Sell topicgenerator

    Hey,

    ik heb in asp eens een klein topicgeneratortje gemaakt voor het buy & sell forum.

    hiervoor heb ik 3 pagina's: form.asp (aantal objecten ingeven), form2.asp (gegevens van objecten ingeven, inleiding en slot ingeven) en resultaat.asp (tekstvak met bbcode).

    te testen op http://ccc.1asphost.com/Wover/TopicGen/form.asp

    to do's:

    - niet ingevulde tekstvakken negeren bij code
    - lay-out verzorgen
    - lijst voor elke lijn bij tekstarea's bij omschrijving
    - code automatisch selecteren en naar klembord kopiëren

    probs:

    - nog niet getest, maar bv voor schermen, als ge daar met " voor inches gaat werken, gaat het wss een fout geven e, een oplossing hiervoor?
    - textarea bij resultaat.asp groter maken, hoe?
    Op reis naar Estland? Kijk eens op HansaGuides
    Buy & Sell iTrader
    no votes  

  2. #2

    Registered
    08/11/03
    Location
    Antwerpen
    Posts
    1,726
    iTrader
    0
    Mentioned
    0 Post(s)
    Reputation
    2/2
    link werkt niet?
    no votes  

  3. #3
    Wover's Avatar
    Registered
    27/12/03
    Location
    Tallinn, Estland
    Posts
    7,622
    iTrader
    40 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/15
    http://free.7host07.com/Wover/form.asp


    daarnet werkte de eerste link nog wel ze


    der is ook nog een probleem met aantal, ge moet maar eens zien, hij geeft altijd iets anders dan het aantal vakken da ge ebt ingegeven

    kzal de codes weergeven, k eb geen css gebruikt ofzo en de standaard dreamweaver brol staat er ook nog bij:

    Code:
    <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
    <title>Topicgenerator [Stap 1/3]</title>
    <style type="text/css">
    <!--
    body {
    	background-color: #000033;
    }
    body,td,th {
    	color: #FFFFFF;
    	font-family: Arial, Helvetica, sans-serif;
    	font-size: 10pt;
    }
    .style1 {font-size: 36pt}
    .style2 {font-size: 12pt; }
    -->
    </style></head>
    
    <body>
    <div align="center">
      <p class="style1">Buy &amp; Sell automatische topicmaker</p>
      <p class="style2">Via dit formulier wordt automatisch BBcode gegenereerd om Buy&amp;Sell topics te maken. Vul de formulieren hieronder in.</p>
      <form id="frm1" name="formulier1" method="post" action="form2.asp">
        <table width="721" border="0">
    
          <tr>
            <td width="125">Aantal objecten </td>
            <td width="160"><input name="txtAantalObjecten" type="text" id="txtAantalObjecten" />        </td>
            <td width="422"><em>Geef het aantal objecten dat je wenst te verkopen in </em></td>
          </tr>
    
          <tr>
            <td height="48">&nbsp;</td>
            <td><div align="center">
              <input name="cmdVolgende" type="submit" id="cmdVolgende" value="&gt;&gt; Verdergaan &gt;&gt;" />
            </div></td>
            <td>&nbsp;</td>
          </tr>
        </table>
      </form>
      <p class="style2">&nbsp; </p>
    </div>
    </body>
    </html>
    Code:
    <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <%
    Dim Aantal, Teller
    
    Aantal = request.form("txtAantalObjecten")
    aantal = aantal + 1
    %>
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
    <title>Topicgenerator [Stap 2/3]</title>
    <style type="text/css">
    <!--
    body,td,th {
    	font-family: Arial, Helvetica, sans-serif;
    	font-size: 10pt;
    	color: #FFFFFF;
    }
    body {
    	background-color: #000033;
    }
    -->
    </style></head>
    
    <body>
    <div align="center">
      <p>Specifeer hier gegevens van de objecten die je wenst te verkopen.</p>
    <form id="frm2" name="formulier2" method="post" action="resultaat.asp?aantal=<%=aantal%>">
      <table width="200" border="0">
        <tr>
          <td>Naam</td>
          <td>Omschrijving</td>
          <td>Link naar site </td>
          <td>Link naar afbeelding </td>
          <td>Minimumprijs</td>
          <td>Meeneemprijs</td>
          <td>Richtprijs</td>
        </tr>
    
    <%
    For Teller = 1 to aantal
    %>
        <tr>
          <td><input name="txtNaam<%=Teller%>" type="text" id="txtNaam" /></td>
          <td><textarea name="txtOmschrijving<%=Teller%>" id="txtOmschrijving"></textarea></td>
          <td><input name="txtLinkInfo<%=Teller%>" type="text" id="txtLinkInfo" /></td>
          <td><input name="txtLinkImage<%=Teller%>" type="text" id="txtLinkImage" /></td>
          <td><input name="txtMinimumPrijs<%=Teller%>" type="text" id="txtMinimumPrijs" /></td>
          <td><input name="txtMeeneemPrijs<%=Teller%>" type="text" id="txtMeeneemPrijs" /></td>
          <td><input name="txtRichtPrijs<%=Teller%>" type="text" id="txtRichtPrijs" /></td>
        </tr>
    <%
    Teller = Teller+1
    Next
    %>
    
      </table>
      <p>Specifeer hier nog een korte inleiding en/of slot </p>
      <table width="721" border="0">
        <tr>
          <td width="125">Inleiding</td>
          <td width="160"><textarea name="txtInleiding" id="txtInleiding"></textarea></td>
          <td width="422"><em>Geef hier een korte inleiding ( bv kameropruiming, of reden van verkoop) </em></td>
        </tr>
    
        <tr>
          <td>Slot</td>
          <td><textarea name="txtSlot" id="txtSlot"></textarea></td>
          <td><em>Een korte slotzin, bv &quot;Happy bidding&quot; </em></td>
        </tr>
        <tr>
          <td height="48">&nbsp;</td>
          <td><div align="center">
              <input name="cmdVolgende" type="submit" id="cmdVolgende" value="&gt;&gt; Verdergaan &gt;&gt;" />
          </div></td>
          <td>&nbsp;</td>
        </tr>
      </table>
      </form>
      <p>&nbsp;</p>
    </div>
    </body>
    </html>
    Code:
    <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <%
    Dim resultaat, naam, omschrijving, richtprijs, meeneemprijs, minimumprijs, linkimage, linkinfo, aantal, inleiding, slot, teller
    
    aantal = request.querystring("aantal")
    aantal = aantal +1
    inleiding=request.form("txtInleiding")
    slot=request.form("txtSlot")
    If inleiding<>"" Then
    resultaat= resultaat & vbNewLine & ".1 Inleiding" & vbNewLine & vbNewline & inleiding & vbNewLine & Vbnewline & ".2 Objecten" & VbNewline & vbNewline & "
    1. " & vbNewline & vbnewline End if For Teller = 1 to aantal naam = request.form("txtNaam" & Teller) omschrijving = request.form("txtOmschrijving" & Teller) richtprijs = request.form("txtRichtprijs" & Teller) meeneemprijs=request.form("txtmeeneemprijs" & Teller) minimumprijs=request.form("txtminimumprijs" & Teller) linkimage=request.form("txtLinkImage" & Teller) linkinfo=request.form("txtLinkinfo" & Teller) resultaat = resultaat & "
    2. " & Naam & vbNewline & vbNewline & "
      1. Omschrijving: " & omschrijving & vbNewline & "
      2. Afbeelding: " & linkimage & vbNewline & "
      3. Info: " & linkinfo & vbNewline & "
      4. Richtprijs: " & richtprijs & vbNewline & "
      5. Minimumprijs: " & Minimumprijs & vbnewline & "
      6. Meeneemprijs: " & meeneemprijs & "
      " teller=teller+1 Next resultaat = resultaat & "
    " If slot <> "" Then resultaat=resultaat & vbNewLine & ".3 Slot" & vbNewLine & vbNewLine & slot & vbNewLine End if %> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <title>Topicgenerator [Stap 3/3]</title> <style type="text/css"> <!-- body,td,th { font-family: Arial, Helvetica, sans-serif; font-size: 10pt; color: #FFFFFF; } body { background-color: #000033; } --> </style></head> <body> <div align="center"> <p>Kopieer volgende code in je topic</p> <p> <textarea name="txtResultaat" id="txtResultaat"><%=resultaat%></textarea> </p> </div> </body> </html>

    edit: hoe kan ik bbcode hier afzetten?
    Op reis naar Estland? Kijk eens op HansaGuides
    Buy & Sell iTrader
    no votes  

  4. #4
    Ramm's Avatar
    Registered
    23/09/03
    Posts
    442
    iTrader
    0
    Mentioned
    0 Post(s)
    Reputation
    0/0
    1) Om " te kunnen gebruiken:
    Code:
    text = replace(text, "'", "''")
    2) BBCode is niet iets dat je zomaar "af"-zet. Je moet gewoon nagaan waar je code omgezet wordt, en dan zorgen dat dat omzeild wordt voor dat stuk tekst
    no votes  

  5. #5
    Wover's Avatar
    Registered
    27/12/03
    Location
    Tallinn, Estland
    Posts
    7,622
    iTrader
    40 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/15
    hey, ik heb zo'n " eens geprobeerd, en het lukt toch

    aantal tekstvakken is nu ook in orde
    Op reis naar Estland? Kijk eens op HansaGuides
    Buy & Sell iTrader
    no votes  

  6. #6
    Dash's Avatar
    Registered
    26/06/04
    Location
    Eeklo
    Posts
    769
    iTrader
    1 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/0
    Een bug is dat als ik bij stap 1 zei dat ik drie objecten wou opgeven, er maar plaats was voor er 2 te specificiëren en uiteindelijk er toch 3 in bb-code stonden. Voor de rest zie ik het nut er niet van in buiten jezelf te trainen op asp, maar swat.
    Dash! Zo wit, schoner kan het niet!
    My portfolio | My deviantART | mus
    no votes  

  7. #7
    Wover's Avatar
    Registered
    27/12/03
    Location
    Tallinn, Estland
    Posts
    7,622
    iTrader
    40 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/15
    Quote Originally Posted by Dash
    This quote is hidden because you are ignoring this member. Show
    Een bug is dat als ik bij stap 1 zei dat ik drie objecten wou opgeven, er maar plaats was voor er 2 te specificiëren en uiteindelijk er toch 3 in bb-code stonden. Voor de rest zie ik het nut er niet van in buiten jezelf te trainen op asp, maar swat.
    die bug is ondertussen opgelost (had bij de for next nen teller+=1 staan omdat er eerst ne Do Loop stond )

    nieuwe url: http://topicgen.menlor.com


    en het heeft zeker nut hoor, buy & sell is een van de populairst fora hier en een uniforme template voor topics zal sommige dingen heel wat duidelijker maken
    Op reis naar Estland? Kijk eens op HansaGuides
    Buy & Sell iTrader
    no votes  

  8. #8
    ToMB's Avatar
    Registered
    15/09/02
    Location
    Gent
    Posts
    828
    iTrader
    56 (98%)
    Mentioned
    0 Post(s)
    Reputation
    0/0
    steek nog een legende op uw 3e pagina voor uw kleurkes en lettergroottes enzow dan ist cava , schoon gedaan
    no votes  

  9. #9
    Wover's Avatar
    Registered
    27/12/03
    Location
    Tallinn, Estland
    Posts
    7,622
    iTrader
    40 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/15
    hoe bedoelde een legende?

    in de code zelf ofwa?
    Op reis naar Estland? Kijk eens op HansaGuides
    Buy & Sell iTrader
    no votes  

  10. #10
    Therif's Avatar
    Registered
    13/01/06
    Location
    Vilvoorde
    Posts
    2,020
    iTrader
    8 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/0
    Waarom VBScript? Het werkt goed op Win, maar niet op linux of mac...
    no votes  

  11. #11
    Gerritn's Avatar
    Registered
    06/04/05
    Location
    Gent
    Posts
    267
    iTrader
    0
    Mentioned
    0 Post(s)
    Reputation
    0/0
    Ik geef bij aantal niks in, klik gewoon op verdergaan, en dan krijg ik de volgende pagina, maar met ook dit erop.

    Microsoft VBScript runtime error '800a000d'

    Type mismatch: '[string: ""]'

    /form2.asp, line 41
    no votes  

  12. #12
    Therif's Avatar
    Registered
    13/01/06
    Location
    Vilvoorde
    Posts
    2,020
    iTrader
    8 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/0
    tja, er is wss geen error handling
    no votes  

  13. #13
    Smoerf's Avatar
    Registered
    28/07/04
    Location
    Wevelgem
    Posts
    552
    iTrader
    0
    Mentioned
    0 Post(s)
    Reputation
    0/0
    Mss een limiet? Als ik 7100 invul kan ik dus 7100 items verkopen? Hm, ik denk dat dit wel wat serverload kan veroorzaken..
    no votes  

  14. #14
    Therif's Avatar
    Registered
    13/01/06
    Location
    Vilvoorde
    Posts
    2,020
    iTrader
    8 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/0
    de limiet zal wss zitten aan integerlimiet

    Het probleem is dat ze gedeclareerd zijn, maar er is geen type toegewezen...
    no votes  

  15. #15
    Therif's Avatar
    Registered
    13/01/06
    Location
    Vilvoorde
    Posts
    2,020
    iTrader
    8 (100%)
    Mentioned
    0 Post(s)
    Reputation
    0/0
    Ik kon mezelf niet tegenhouden en ik heb de code herschreven in php... Ik geef de code vrij wanneer deze werkt

    Ik heb wel ervoor gezorgd dat er geen serveroverloading is door de server niet te gebruiken, maar alles lokaal te genereren

    Mja, jullie zullen wel zien
    no votes  

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Log in

Log in