<% if len(request.querystring("ID")) = 0 then response.write "ERROR! ID IS MISSING OR IS INVALID!" else ' Make list of all movies 'createdataobject "d:\home\dirchpasserdk\db\film.mdb" createdataobject "mySQL" 'opentable "select * from Film where ID = " & clng(request.querystring("ID")) & ";" Set rs = DBConn.Execute("SELECT * FROM teaterstykker WHERE ID = " & clng(request.querystring("ID")) & ";") if (rs.eof or rs.bof) then response.write "ID " & clng(request.querystring("ID")) & " not found!" else ID = server.htmlencode(rs("ID")) instruktor = rs("instruktor") Titel = rs("stykkenavn") if (isEmpty(rs("beskrivelse")) = false) AND (isNull(rs("beskrivelse")) = false) then Tekst = replace(rs("beskrivelse"),vbcrlf,"<br>") end if Copyright = rs("iscenesettelse") Billede = rs("Billede") eYear = rs("premiere")
'Table: teaterstykker: 'ID : auto increment 'stykkenavn : char(50) 'instruktor : char(50) 'premiere : char(15) 'iscenesettelse : char(50) 'beskrivelse : text 'teater : int ' 'Table: teater 'teaternavn : char(70) end if ' closetable closedataobject %>
Jesper læser jeg ikke rigtig når det du skal er at fjerne de to felter -instruktor -iscenesettelse I dette tilfælde er det ikke tabeller som skal fjernes men felter... VIGTIG!!!
Der er nemlig forskel på disse to, den ene er selve tabellen den anden er felterne i tabellen.
For at fjerne felter skal du bruge ALTER stamentet (og den skal kun køres en gang så er de fjernet for altid): DBConn.Execute("ALTER TABLE teaterstykker DROP COLUMN instruktor") DBConn.Execute("ALTER TABLE teaterstykker DROP COLUMN iscenesettelse")
Men igen, du skal nok lige beskrive lidt om hvad det er der sker... for hvis det bare er fordi du ikke vil have det vist på siden... kan du jo bare vælge ikke at udskrive det til klienten... og i dette tilfælde er det ikke den ovenståenden kode som du viser som vi skal rediger i...
Det er som du selv skriver....at jeg ikke ønsker at ha' de 2 tabeller: -instruktor -iscenesettelse
Vist inde på siden. Jeg prøver lige at postere hele showteater.asp.
----------------------------------------------
<!--#include file="includes/data.inc"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>Teater</title> <link REL="STYLESHEET" TYPE="text/css" HREF="ny.css"> <base target="hovedramme"> </head> <body bgcolor="#EDEEDD"> <% if len(request.querystring("ID")) = 0 then response.write "ERROR! ID IS MISSING OR IS INVALID!" else ' Make list of all movies 'createdataobject "d:\home\dirchpasserdk\db\film.mdb" createdataobject "mySQL" 'opentable "select * from Film where ID = " & clng(request.querystring("ID")) & ";" Set rs = DBConn.Execute("SELECT * FROM teaterstykker WHERE ID = " & clng(request.querystring("ID")) & ";") if (rs.eof or rs.bof) then response.write "ID " & clng(request.querystring("ID")) & " not found!" else ID = server.htmlencode(rs("ID")) instruktor = rs("instruktor") Titel = rs("stykkenavn") if (isEmpty(rs("beskrivelse")) = false) AND (isNull(rs("beskrivelse")) = false) then Tekst = replace(rs("beskrivelse"),vbcrlf,"<br>") end if Copyright = rs("iscenesettelse") Billede = rs("Billede") eYear = rs("premiere")
'Table: teaterstykker: 'ID : auto increment 'stykkenavn : char(50) 'instruktor : char(50) 'premiere : char(15) 'iscenesettelse : char(50) 'beskrivelse : text 'teater : int ' 'Table: teater 'teaternavn : char(70) end if ' closetable closedataobject %> <table border="0" cellpadding="2" class="normaltable" width="100%"> <tr> <td style="color: #FFFFFF" bgcolor="#000000" width="50%" height="30"> <%=Titel%> (<%=eYear%>)</td> </tr> <tr> <td> <table border="0" width="100%" class="normaltable" cellspacing="3" cellpadding="3"> <tr> <td width="1%"><% if len(Billede) > 0 then %><img src="<%=Billede%>"><%end if %></td> <td width="50%" valign="top"> Iscenesættelse: <%=Copyright%><br> Intruktør: <%=instruktor%><br><br><br> <%=Tekst%></td> </tr> </table> </td> </tr> <tr> <td align="center" bgcolor="#DEDFBF" height="30"> </td> </tr> </table> <% end if %> </body>
Hvis du har slettet iscenesettelse Skal det se sådan her ud EKSEMPEL 1:
Hvis du har slettet instruktor Skal det se sådan her ud EKSEMPEL 2:
Hvis du har slettet instruktor & iscenesettelse Skal det se sådan her ud EKSEMPEL 3:
EKSEMPEL 1:-------------------------------------------------------------------------- <!--#include file="includes/data.inc"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>Teater</title> <link REL="STYLESHEET" TYPE="text/css" HREF="ny.css"> <base target="hovedramme"> </head> <body bgcolor="#EDEEDD"> <% if len(request.querystring("ID")) = 0 then response.write "ERROR! ID IS MISSING OR IS INVALID!" else ' Make list of all movies 'createdataobject "d:\home\dirchpasserdk\db\film.mdb" createdataobject "mySQL" 'opentable "select * from Film where ID = " & clng(request.querystring("ID")) & ";" Set rs = DBConn.Execute("SELECT * FROM teaterstykker WHERE ID = " & clng(request.querystring("ID")) & ";") if (rs.eof or rs.bof) then response.write "ID " & clng(request.querystring("ID")) & " not found!" else ID = server.htmlencode(rs("ID")) instruktor = rs("instruktor") Titel = rs("stykkenavn") if (isEmpty(rs("beskrivelse")) = false) AND (isNull(rs("beskrivelse")) = false) then Tekst = replace(rs("beskrivelse"),vbcrlf,"<br>") end if Billede = rs("Billede") eYear = rs("premiere")
'Table: teaterstykker: 'ID : auto increment 'stykkenavn : char(50) 'instruktor : char(50) 'premiere : char(15) 'beskrivelse : text 'teater : int ' 'Table: teater 'teaternavn : char(70) end if ' closetable closedataobject %> <table border="0" cellpadding="2" class="normaltable" width="100%"> <tr> <td style="color: #FFFFFF" bgcolor="#000000" width="50%" height="30"> <%=Titel%> (<%=eYear%>)</td> </tr> <tr> <td> <table border="0" width="100%" class="normaltable" cellspacing="3" cellpadding="3"> <tr> <td width="1%"><% if len(Billede) > 0 then %><img src="<%=Billede%>"><%end if %></td> <td width="50%" valign="top"> Intruktør: <%=instruktor%><br><br><br> <%=Tekst%></td> </tr> </table> </td> </tr> <tr> <td align="center" bgcolor="#DEDFBF" height="30"> </td> </tr> </table> <% end if %> </body>
EKSEMPEL 2:-------------------------------------------------------------------------- <!--#include file="includes/data.inc"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>Teater</title> <link REL="STYLESHEET" TYPE="text/css" HREF="ny.css"> <base target="hovedramme"> </head> <body bgcolor="#EDEEDD"> <% if len(request.querystring("ID")) = 0 then response.write "ERROR! ID IS MISSING OR IS INVALID!" else ' Make list of all movies 'createdataobject "d:\home\dirchpasserdk\db\film.mdb" createdataobject "mySQL" 'opentable "select * from Film where ID = " & clng(request.querystring("ID")) & ";" Set rs = DBConn.Execute("SELECT * FROM teaterstykker WHERE ID = " & clng(request.querystring("ID")) & ";") if (rs.eof or rs.bof) then response.write "ID " & clng(request.querystring("ID")) & " not found!" else ID = server.htmlencode(rs("ID")) Titel = rs("stykkenavn") if (isEmpty(rs("beskrivelse")) = false) AND (isNull(rs("beskrivelse")) = false) then Tekst = replace(rs("beskrivelse"),vbcrlf,"<br>") end if Copyright = rs("iscenesettelse") Billede = rs("Billede") eYear = rs("premiere")
'Table: teaterstykker: 'ID : auto increment 'stykkenavn : char(50) 'premiere : char(15) 'iscenesettelse : char(50) 'beskrivelse : text 'teater : int ' 'Table: teater 'teaternavn : char(70) end if ' closetable closedataobject %> <table border="0" cellpadding="2" class="normaltable" width="100%"> <tr> <td style="color: #FFFFFF" bgcolor="#000000" width="50%" height="30"> <%=Titel%> (<%=eYear%>)</td> </tr> <tr> <td> <table border="0" width="100%" class="normaltable" cellspacing="3" cellpadding="3"> <tr> <td width="1%"><% if len(Billede) > 0 then %><img src="<%=Billede%>"><%end if %></td> <td width="50%" valign="top"> Iscenesættelse: <%=Copyright%><br><br><br> <%=Tekst%></td> </tr> </table> </td> </tr> <tr> <td align="center" bgcolor="#DEDFBF" height="30"> </td> </tr> </table> <% end if %> </body>
EKSEMPEL 2:-------------------------------------------------------------------------- <!--#include file="includes/data.inc"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>Teater</title> <link REL="STYLESHEET" TYPE="text/css" HREF="ny.css"> <base target="hovedramme"> </head> <body bgcolor="#EDEEDD"> <% if len(request.querystring("ID")) = 0 then response.write "ERROR! ID IS MISSING OR IS INVALID!" else ' Make list of all movies 'createdataobject "d:\home\dirchpasserdk\db\film.mdb" createdataobject "mySQL" 'opentable "select * from Film where ID = " & clng(request.querystring("ID")) & ";" Set rs = DBConn.Execute("SELECT * FROM teaterstykker WHERE ID = " & clng(request.querystring("ID")) & ";") if (rs.eof or rs.bof) then response.write "ID " & clng(request.querystring("ID")) & " not found!" else ID = server.htmlencode(rs("ID")) Titel = rs("stykkenavn") if (isEmpty(rs("beskrivelse")) = false) AND (isNull(rs("beskrivelse")) = false) then Tekst = replace(rs("beskrivelse"),vbcrlf,"<br>") end if Billede = rs("Billede") eYear = rs("premiere")
'Table: teaterstykker: 'ID : auto increment 'stykkenavn : char(50) 'premiere : char(15) 'beskrivelse : text 'teater : int ' 'Table: teater 'teaternavn : char(70) end if ' closetable closedataobject %> <table border="0" cellpadding="2" class="normaltable" width="100%"> <tr> <td style="color: #FFFFFF" bgcolor="#000000" width="50%" height="30"> <%=Titel%> (<%=eYear%>)</td> </tr> <tr> <td> <table border="0" width="100%" class="normaltable" cellspacing="3" cellpadding="3"> <tr> <td width="1%"><% if len(Billede) > 0 then %><img src="<%=Billede%>"><%end if %></td> <td width="50%" valign="top"><%=Tekst%></td> </tr> </table> </td> </tr> <tr> <td align="center" bgcolor="#DEDFBF" height="30"> </td> </tr> </table> <% end if %> </body>
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.