Avatar billede fancy Mester
22. marts 2009 - 23:00 Der er 1 løsning

Trække fra og fjene en knap

jeg har denne kode men jeg kan ikke finde ud af hvordan jeg for den til at trække en tilmelding fra og så skulled en gerne fjerne kappen tilmeding eller gøre den ubrugelig

<% @LANGUAGE = VBScript %>
<%
  Option Explicit
  Response.Expires=0

  Dim objConn, objRS, strQ
  Dim strConnection
  Dim i
  Dim strAID

  If Request.ServerVariables("QUERY_STRING")<> "" then
    strAID  = Trim(Request.QueryString("AID"))
  End If
   
%>
    <!-- #include file="Includes\ConnectDB.inc" -->
<%

  Sub GetArrangement
    strQ = "SELECT * FROM lbArrangement WHERE AID = " & strAID
    Set objRS = objConn.Execute(strQ)   
  end Sub
 
  ConnectDB
  GetArrangement
%>
<html>
<head>
<title>Langeskovborgerforening</title>
<!-- #include file="includes\java.inc" -->
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#0099ff">
<table width="100%" height="100%" border="0">
  <tr>
    <td align="center" valign="top">
        <!-- #include file="includes\top.inc" -->
        <table width="800" cellpadding="0" cellspacing="0" bgcolor="#0099ff">
        <tr>
          <td width="155" align="center" valign="top"></td>
          <td width="645" align="center" valign="top" height="500">
            <table width="630" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td bgcolor="#0099ff" width="530" height="30"><font face="Verdana" size="2" color="#0099ff"><b><% Response.Write objRS("Arrangement") %></b></font></td>
                <td bgcolor="#0099ff" width="100" height="30" align="center"><% If objRS("Tilmelding") = 1 Then Response.Write "<a href='tilmeld.asp?AID=" & strAID & "'><img src='images/tilmeld.jpg' border='0'></a>" End IF %></td>
              </tr>
              <tr>
                <td align="center" valign="middle" colspan="2"><% If objRS("Billed")<>"0" Then Response.Write "<br><img src='images/arrangement/" & objRS("Billed") & "'><br><br>" End If%></td>
              </tr>
              <tr>
                <td align="left" colspan="2"><font face="Verdana" size="2" color="#000000"><% Response.Write objRS("Tekst") %></font></td>
              </tr>
                          <tr>
                <td align="left" colspan="2"><font face="Verdana" size="2" color="#000000"><br><% Response.Write objRS("antal") %>  Antal biletter som er tilbage</font></td>
              </tr>
            </table>
            <br>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>
Avatar billede fancy Mester
02. april 2009 - 09:02 #1
Fundet en anden løsning
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