Notifikationer

Markér alle som læst Log ud

badazz Novice

08. juni 2003 - 15:00 Der er 11 kommentarer og
1 løsning

Script til "underskriftsindsalmlig"

Hejsa..

jeg skal bruge et lille script samt en access database til en lille underskriftsindsamling.. der skal være to felter der kan udfyldes. en der hedder navn og en der hedder gruppen, indtastningsboksene skal stå øverst på siden, og nederst på siden skal den skrive alle resultaterne under hinanden med et klokkeslet og dato for indtastning til sidst! de skal bare være simpelt og alt grafisk klarer jeg selv, bare du kan lave koden til mig! jeg ved det ikke er nogen stor opgave, men der er alligevel 200 point at hente til den der klarer udfordringen!!
jeg kan kontaktes på mail mail@badazz.dk og icq: 253188536

Mvh Brian

Synes godt om

ducks Nybegynder

08. juni 2003 - 15:14 #1

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("DDB.mdb")

Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "Select * FROM underskrifter order by id asc"
RS.Open SQL, Conn, 3, 3

Set RSIP = Server.CreateObject("ADODB.Recordset")
SQLIP = "Select * FROM iper where ip='"& Request.ServerVariables("REMOTE_ADDR") &"'"
RSIP.Open SQLIP, Conn, 3, 3
%>
<form method="post" action="DenHerSide.asp">
<input type="text" name="navn">
<input type="submit" value="Skriv">
</form>
<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" And RSIP.EOF Then
RS.AddNew
RS("navn") = Request.Form("navn")
RS("dato") = date
RS.Update
End If

Response.Write(RS("navn") &" - "& RS("dato") &"<br>")
%>

Lav en database der hedder DDB opret to tabeller: underskrifter og iper. I underskrifter skal der være 3 kolonner: id (autonumminering), navn(tekst), dato(dato). iper skal der være en der hedder ip(tekst).

Håber det virker, har ik testet det :)

Synes godt om

badazz Novice

08. juni 2003 - 15:16 #2

Jeg prøver det lige.. og virker det. får du dine point!! :)

Synes godt om

badazz Novice

08. juni 2003 - 15:34 #3

nu er jeg ikke skide hård til Access så hvordan angiver jeg lige at et felt skal være autonummerering og et andet skal være dato osv..?

Synes godt om

hossein Nybegynder

08. juni 2003 - 15:52 #4

dette kursus viser hvordan man arbejder med msAccess. hvis du kigger på det så måske hjælper:
http://www.it-c.dk/people/pbras/Ebuss/Kursus.doc (i side 9 og 10 kan du se hvordan man angiver datatyperne: Autonumering osv)
Det hele ligger under:
http://www.it-c.dk/people/pbras/Ebuss/

Synes godt om

ducks Nybegynder

08. juni 2003 - 15:52 #5

http://80.162.33.152/ddb.mdb

sig lige til når den er hentet, så jeg kan slette den igen.

Synes godt om

badazz Novice

08. juni 2003 - 15:55 #6

Jeg kan ikke få det til at virke.. jeg har lavet den sådan her:

<html>
<head>
<title>Underskriftsindsamling</title>
</head>
<body>

Skriv her:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("DDB.mdb")

Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "Select * FROM underskrifter order by id asc"
RS.Open SQL, Conn, 3, 3

Set RSIP = Server.CreateObject("ADODB.Recordset")
SQLIP = "Select * FROM iper where ip='"& Request.ServerVariables("REMOTE_ADDR") &"'"
RSIP.Open SQLIP, Conn, 3, 3
%>
<form method="post" action="default.asp">
<input type="text" name="navn">
<input type="submit" value="Skriv">
</form>

Folk der har skrevet:

<%
If Request.ServerVariables("REQUEST_METHOD") = "POST" And RSIP.EOF Then
RS.AddNew
RS("navn") = Request.Form("navn")
RS("dato") = date
RS.Update
End If

Response.Write(RS("navn") &" - "& RS("dato") &"<br>")
%>

</body>
</html>

og lavet databasen efter din anvisning du kan hente databansen her: http://www.jebs.dk/badazz/test/ddb.mdb

hvis du vil tjecke den og selve siden som ikke virker er her: http://www.jebs.dk/badazz/test/default.asp

Synes godt om

ducks Nybegynder

08. juni 2003 - 15:58 #7

Fordi du i databasen skriver forbogstav med stort og det gør du ikke i asp koden, da lige præcis det med databaser er casesensivity skal det stå ens :) - så hvis du retter alt i datasen til småt, burde det virke.

Synes godt om

badazz Novice

08. juni 2003 - 16:00 #8

jeg har hentet den database du har lavet, og uploadet dem, men det virker stadig ikke..

Synes godt om

badazz Novice

08. juni 2003 - 16:02 #9

det skulle være rigtigt med småt og stort osv.

Synes godt om

ducks Nybegynder

08. juni 2003 - 16:04 #10

Ret den her:

Response.Write(RS("navn") &" - "& RS("dato") &"<br>")

til:

If RS.EOF Then
Response.Write("Der er ingen underskrifter endnu.")
Else
RS.MoveFirst
Do Until RS.EOF
Response.Write(RS("navn") &" - "& RS("dato") &"<br>")
RS.MoveNext
Loop
End If

Synes godt om

ducks Nybegynder

08. juni 2003 - 16:09 #11

Håber det virker kommer tilbage senere, det tordner og lyner så jeg er nødt til at slukke.

Synes godt om

badazz Novice

08. juni 2003 - 16:14 #12

Så virker det.. jeg ved ikke lige hvad det skete for det web hotel, men det virker nu på min egen computer jeg takker, og du får dine piont!

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS