ALTSÅ SÅDAN HER ???
<html>
<head>
<title>Træk et tarotkort</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
</head>
<body>
<!-- FREMGANGSMÅDE ER FØLGENDE -->
<!-- A - JEG OPRETTER EN DATABASE PÅ MIT WEBHOTEL -->
<!-- A - I DENNE DATABASE LAVER JEG TO RÆKKER - EN MED TAROTKORTENE OG EN MED FORKLARENDE TEKST -->
<!-- B - SÅ LAVER JEG EN ASP FIL DER KALDER DETTE RECORDSÆT OG TILFÆLDIGT UDVÆLGER EN AD DEM -->
<p>Dette er en ny ASP fil til at kalde en database og lave random udvælgelse af
tarotkortene</p>
<!-- DETTE ER KODEN TIL AT OPRETTE MIN DATABASE -->
create database Tarotkort
create table Kortene
(
Kortnr integer,
Forklaring varchar(500)
)
insert into Kortene
(Tarotkortet, Hvad kortet betyder)
values (taortkort_1.gif, 'så skriver jeg heriforklaringen til kortet),
values (taortkort_2.gif, 'så skriver jeg heriforklaringen til kortet),
values (taortkort_3.gif, 'så skriver jeg heriforklaringen til kortet)
<!-- Etc. for de andre tarotkort -->
<!-- HEREFTER LAVER JEG SÅ EN ASP FIL SOM JEG KALDER TRÆK ET TAROTKORT OG INDSÆTTER FØLGENDE KODE -->
<!-- <html>
<head>
<title>ASP FIL - TRÆK ET TAROTKORT</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
</head>
<body>
<%
' random record
If Not(rsRandom.bof and rsRandom.eof) Then
If (rsRandom.CursorType > 0) Then
rsRandom.MoveFirst
Else
rsRandom.Requery
End If
rsRandom_totalrn = -1
rsRandom_totalrn = rsRandom.RecordCount
If (rsRandom_totalrn = -1) Then
rsRandom_totalrn=0
While (Not rsRandom.EOF)
rsRandom_totalrn = rsRandom_totalrn + 1
rsRandom.MoveNext
Wend
If (rsRandom.CursorType > 0) Then
rsRandom.MoveFirst
Else
rsRandom.Requery
End If
End If
rsRandom_totalrn = rsRandom_totalrn - 1
If rsRandom_totalrn > 0 Then
Randomize
rsRandom.Move Int((rsRandom_totalrn + 1) * Rnd)
End If
End If
%>
<% If Not rsRandom.EOF Or Not rsRandom.BOF Then %>
<img src="random_gfx/<%=(rsRandom.Fields.Item("dit_db_felt").Value)%>">
<% End If %>
<TABEL><TR><TD>HER FREMKOMMER SELVE BILLEDET</TD><TD>HER FREMKOMMER TEKSTEN</TD>
<TR>HER ER KNAPPEN MAN SKAL TRYKKE PÅ FOR AT TRÆKKE ET TILFÆLDIGT KORT</TR></TABEL>
</body>
</html>-->
Ny bruger
Nybegynder
Opret
Preview
