Avatar billede e30 Nybegynder
06. marts 2001 - 12:07 Der er 15 kommentarer og
1 løsning

Skal bruge ASP script til køb/salg

Hej

Jeg skal bruge en ASP-side til mit web-site hvor brugere kan sætte ting til salg og købes på siden. Det skal laves så det er tidsbestemt hvorlang tid det skal stå til salg, brugeren skal så definere hvorlangt tid det er.

Følgende feltnavne skal bruges:

Navn:
E-mail:
Tlf.:
Sælges/beskrivelse:
Varighed til salg:

Er der nogen der vil/kan lave det eller noget lignende til mig?

Skriv tilbage hvis i kan/vil så får i min e-mail adresse.
Avatar billede jonax Nybegynder
06. marts 2001 - 12:32 #1
Kan jeg sagtens...
Avatar billede e30 Nybegynder
06. marts 2001 - 12:35 #2
henrik-friis@mail.tele.dk

Lyder godt ... tak

Du kan bare maile når du har noget klar.
Avatar billede bacardil Nybegynder
06. marts 2001 - 21:54 #3
Skal det ikke være noget auktion ting?
Avatar billede e30 Nybegynder
07. marts 2001 - 08:04 #4
Ikke auktion brugeren skal bare kunne sætte en annonce på siden som eksempelvis har en gyldighedsperiode på en måned.
Avatar billede kasseper Nybegynder
07. marts 2001 - 08:51 #5
har du fået et svar ? Eller kan jeg også nå at gøre et forsøg....?
Avatar billede e30 Nybegynder
07. marts 2001 - 08:54 #6
kasseper>> Du må gerne komme med et bud.

Jeg hæver lige point til 320 point så der er nok hvis i begge har et godt bud!
Avatar billede kasseper Nybegynder
07. marts 2001 - 09:00 #7
Er vi enige om at du selv klare selve designet ???
Jeg er ikke nogen ørn til at tegne :)
Avatar billede kasseper Nybegynder
07. marts 2001 - 09:02 #8
Der skal jo bruges en database, er det en du selv har lavet, eller skal jeg alve den også ???
Avatar billede e30 Nybegynder
07. marts 2001 - 09:03 #9
Jeg skal nok selv lave designet.

Du må gerne lave en access database - :-)
Avatar billede kasseper Nybegynder
07. marts 2001 - 10:23 #10
Her er min kode :
***********************
<%
dim navn, email, tlf, besk, nedl1, nedl2
navn = request.form(\"navn\")
email = request.form(\"email\")
tlf = request.form(\"tlf\")
besk = request.form(\"beskrivelse\")
nedl1 = request.form(\"nedlagges\")
nedl2 = dateAdd(\"d\",nedl1,date())
  DBPath = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
  DBPath = DBPath &  \"DBQ=\" & server.mappath(\"mydb.mdb\")
  set objConn = server.createobject(\"ADODB.connection\")
  objConn.Open DBPath
if navn <> \"\" then
SQL = \"insert into mytable (Navn, Email, Tlf, Sb, oprettet, nedlagges) Values (\'\"
SQL = SQL & navn & \"\', \'\" & email & \"\', \'\" & tlf & \"\', \'\" & besk & \"\', #\" & date() & \"#, #\" & nedl2 & \"#)\"
objConn.execute(SQL)
end if
    SQL = \"delete from mytable where nedlagges < #\" & date() & \"#\"
      objConn.execute(SQL)
    SQL = \"select * from mytable where oprettet <= #\" & date() & \"#\"
    set rs = objConn.execute(SQL)
%>
<html>
<head>
<title>
KØB OG SALG
</title>
</head>
<body>
Køb og salg
<table border=\"2\">
    <tr>
    <td>Oprettet af :</td>
    <td>E-mail adresse :</td>
    <td>Telefon nummer : </td>
    <td>Sælges/beskrivelse : </td>
    <td>Sidste salgsdag : </td>
    </tr>
<%
while NOT rs.eof
%>
    <tr>
    <td><%= rs(\"Navn\")%></td>
    <td><%= rs(\"Email\") %></td>
    <td><%= rs(\"Tlf\") %></td>
    <td><%= rs(\"Sb\") %></td>
    <td><%= rs(\"nedlagges\") %></td>
    </tr>
<%
rs.movenext
wend
%>
</table>
<form action=\"visside.asp\" method=\"post\">
<br>
opret et indlæg :<br>
Navn : <input type=\"text\" name=\"navn\"><br>
Email : <input type=\"text\" name=\"email\"><br>
Telefonnummer : <input type=\"text\" name=\"tlf\"><br>
Sælges/Beskrivelse : <br>
<textarea name=\"beskrivelse\"></textarea><br>
hvor længe : <input type=\"text\" name=\"nedlagges\"><br>
<input type=\"submit\" value=\"Indsend\">
</form>
<%
rs.Close
set rs = nothing
objConn.Close
set objConn = Nothing
%>
</body>
</html>
****************
databasen har jeg sendt, og begge filer skal ligge i samme bibl.
Håber du kan bruge det, hvis der er fejl må du lige råbe op.
Avatar billede e30 Nybegynder
07. marts 2001 - 10:37 #11
Det virker fint - tak skal du ha` :-)
Avatar billede kasseper Nybegynder
07. marts 2001 - 10:39 #12
my pleasure :)
Avatar billede e30 Nybegynder
07. marts 2001 - 10:45 #13
Hej kasseper

Lige nu lægger den nye indlæg nederst i tabellen.

Kan man ikke gøre så de nye indlæg kommer øverst i tabellen?

Avatar billede kasseper Nybegynder
07. marts 2001 - 10:47 #14
Joohhh, det kan jeg da...
Altså rent database mæssigt, kan man ikke lige gøre det, men når du ser dem på siden, kan du bare erstatte denne linie :
SQL = \"select * from mytable where oprettet <= #\" & date() & \"#\"
   
Med

SQL = \"select * from mytable where oprettet <= #\" & date() & \"# order by oprettet\"
Avatar billede e30 Nybegynder
07. marts 2001 - 10:56 #15
Endnu engang tak!
Avatar billede kasseper Nybegynder
07. marts 2001 - 10:59 #16
selv tak
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester