<% if request.querystring("vis") = "1234" then %> Hej her er teksten til vis 1234 <% end if %> <% if request.querystring("id") = "1234" then %> Hej her er teksten til id 1234 <% end if %>
jeg tror ikke den bliver så tung da det kun er tekst. Hvis du vil have et billede ind gør du jo bare sådan her.:
<% if request.querystring("butik") = "12345" then %> Hej her er teksten til butik 12345 her kan du sætte et billede ind. <IMG SRC="logo.gif"> <% end if %>
Du kan bruge ganske almindeligt html kode inde i mellem de to tags
fun22> Jeg kunne godt tænke mig, at lave siden sådan:
index.asp --> Her klikker man sig videre til byen:
by.asp?by=aarhus --> så vælger man en butik:
butik.asp?butik=12345
dvs. at index.asp, by.asp og butik.asp har hvert sit design. Eller i hvert fald har mulighed for det. Og så skulel det gerne være muligt at tilføje en butik, ved at lægge en 12345.txt og en 12345.jpg fil ind, uden at skulle andre i butik.asp
Du kan godt lave det i en txt fil .... det laver du med FileSystemObject... Men en nemmere måde (synes jeg ) , er , at lave den så du skriver teksterne i en database, og henter dem ned :o)
response.write "<img border=""1"" src=""" & hep & ".jpg" & """>"
response.write "<br>"
Dim fso, f, filespec Set fso = CreateObject("Scripting.FileSystemObject") filespec = Server.Mappath(hep & ".txt") Set f = fso.OpenTextFile(filespec,1) Do While not f.AtEndOfStream Response.write f.ReadLine & "<br>" Loop f.Close %>
Hvis du så går ind på side.asp?butik=12345 Så vil den vise det billede som hedder 12345.jpg, og hente den txt-fil som hedder 12345.txt
jo .. det kan du selvfølgelig godt... Det vil klart være nemmeste løsning. Men på den anden måde kan du lave en dynamisk side... forstået på den måde, at du ikke behøver sidde og lave alle de includes, du laver det bare med en databaseforbindelse, og henter det ud som du skal bruge...
Ja, det kan du godt. Fx sådan: <% Hep = request.querystring("butik") %> <table border="1" cellpadding="0" cellspacing="0" width="100%"> <tr> <td width="50%"> <% Dim fso, f, filespec Set fso = CreateObject("Scripting.FileSystemObject") filespec = Server.Mappath(hep & ".txt") Set f = fso.OpenTextFile(filespec,1) Do While not f.AtEndOfStream Response.write f.ReadLine & "<br>" Loop f.Close %> </td> <td width="50%"><% response.write "<img border=""1"" src=""" & hep & ".jpg" & """>" %></td> </tr> </table>
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.