Avatar billede want2learn Nybegynder
28. april 2006 - 23:06 Der er 10 kommentarer

is not a metode

Hej hvordan kan jeg få dette til at virke, den fejl jeg får er at if mm. "Is not a metode"

default.aspx
<%@ Page Language="VB" MasterPageFile="default.master" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<asp:content id="startsite" contentplaceholderid="Main" runat="server">
<%
    Dim thispage As String = Request.QueryString("page")
    Dim writeEmptyPage() As String
    Dim writeSpillePage() As String
    Dim writeBestyrelsePage() As String
    Dim writeUngdomsUdPage() As String
    Dim writeMedlemPage() As String
    Dim writeSponsorPage() As String
   
    If thispage = "" Then
      writeEmptyPage()
    ElseIf thispage = "atspille" Then
      writeSpillePage()
    ElseIf thispage = "bestyrelsen" Then
      writeBestyrelsePage()
    ElseIf thispage = "ungdomsudvalg" Then
      writeUngdomsUdPage()
    ElseIf thispage = "medlemsskab" Then
      writeMedlemPage()
    ElseIf thispage = "sponsor" Then
      writeSponsorPage()
    End If
%>
</asp:content>

den skal kunne læse hvad Page er og hvis den er en ting skal der vise en ting på siden og hvis den er noget andet så en anden side.
Avatar billede arne_v Ekspert
28. april 2006 - 23:13 #1
skal de eksekverbare linier ikke i en metode ?
Avatar billede dr_chaos Nybegynder
29. april 2006 - 09:01 #2
jo lig dem i page_load i codebehind
Avatar billede dr_chaos Nybegynder
29. april 2006 - 09:01 #3
Det er ikke asp du bruger.
Avatar billede want2learn Nybegynder
29. april 2006 - 16:35 #4
hvis jeg gør dette på default.aspx.vb så får jeg en fajl som er

Statement is not valid in a namespace...

ang første linje som er "Sub page......."

Sub Page_Load(ByVal Sender As Object, ByVal e As EventArgs)
    Dim thispage As String = Request.QueryString("page")
    Dim writeEmptyPage() As String
    Dim writeSpillePage() As String
    Dim writeBestyrelsePage() As String
    Dim writeUngdomsUdPage() As String
    Dim writeMedlemPage() As String
    Dim writeSponsorPage() As String

    If thispage = "" Then
        writeEmptyPage()
    ElseIf thispage = "atspille" Then
        writeSpillePage()
    ElseIf thispage = "bestyrelsen" Then
        writeBestyrelsePage()
    ElseIf thispage = "ungdomsudvalg" Then
        writeUngdomsUdPage()
    ElseIf thispage = "medlemsskab" Then
        writeMedlemPage()
    ElseIf thispage = "sponsor" Then
        writeSponsorPage()
    End If
End Sub
Avatar billede dr_chaos Nybegynder
29. april 2006 - 17:11 #5
paste lige koden til begge sider
Avatar billede want2learn Nybegynder
29. april 2006 - 17:34 #6
default.aspx.vb

Partial Class _Default
    Inherits System.Web.UI.Page

End Class
Sub Page_Load(ByVal Sender As Object, ByVal e As EventArgs)
    Dim thispage As String = Request.QueryString("page")
    Dim writeEmptyPage() As String
    Dim writeSpillePage() As String
    Dim writeBestyrelsePage() As String
    Dim writeUngdomsUdPage() As String
    Dim writeMedlemPage() As String
    Dim writeSponsorPage() As String

    If thispage = "" Then
        writeEmptyPage()
    ElseIf thispage = "atspille" Then
        writeSpillePage()
    ElseIf thispage = "bestyrelsen" Then
        writeBestyrelsePage()
    ElseIf thispage = "ungdomsudvalg" Then
        writeUngdomsUdPage()
    ElseIf thispage = "medlemsskab" Then
        writeMedlemPage()
    ElseIf thispage = "sponsor" Then
        writeSponsorPage()
    End If
End Sub


default.aspx

<%@ Page Language="VB" MasterPageFile="default.master" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<asp:content id="startsite" contentplaceholderid="Main" runat="server">
tester
</asp:content>


default.master

<%@ Master Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">

</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
  <title></title>
  <link rel="stylesheet" type="text/css" href="include/style.css" title="style" />
</head>
<body>
<table cellpadding="0px" cellspacing="0px" class="TableMain">
<tr>
  <td colspan="5" class="TopBanner"></td>
</tr>
<tr>
  <td rowspan="2" class="TableLeft"></td>
  <td width="503px" align="center" valign="top">
  <table width="100%"  border="0px" cellspacing="0px" cellpadding="0px">
    <tr>
    <td>
      <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="503px" height="64px" title="menu">
      <param name="movie" value="bif_menu_test.swf" />
      <param name="quality" value="high" />
      <embed src="bif_menu_test.swf" pluginspage="http://www.macromedia.com/go/getflashplayer"  width="503px" height="64px"></embed>
      </object>
    </td>
    </tr>
    <tr>
    <td>
      <form id="form1" runat="server">
      <div>
        <asp:contentplaceholder id="main" runat="server">
        </asp:contentplaceholder>
      </div>
      </form>
    </td>
    </tr>
  </table> 
  </td>
  <td rowspan="2" class="TableCenter"></td>
  <td width="206px" rowspan="2" valign="top">
  <table cellpadding="0px" cellspacing="0px">
    <tr>
    <td><img src="images/last_played_match.gif" width="206px" height="36px" border="0px" alt="" /></td>
    </tr>
    <tr>
    <td><div class="Right">last play</div></td>
    </tr>
    <tr>
    <td><img src="images/next_match.gif" width="206px" height="36px" border="0px" alt="" /></td>
    </tr>
    <tr>
    <td><div class="Right">Comming play<br />jhsdfsds.</div></td>
    </tr>
    <tr>
    <td><img src="images/day_match.gif" width="206px" height="36px" border="0px" alt="" /></td>
    </tr>
    <tr>
    <td><div class="Right">Today play<br />llæa</div></td>
    </tr>
    <tr>
    <td><img src="images/sponsore.gif" width="206px" height="36px" border="0px" alt="" /></td>
    </tr>
    <tr>
    <td><div class="Right">sponsor<br />hjhj</div></td>
    </tr>
  </table>
  </td>
  <td rowspan="2" class="TableRight"></td>
</tr>
<tr>
  <td align="center" valign="bottom"></td>
</tr>
</table>
</body>
</html>
Avatar billede dr_chaos Nybegynder
29. april 2006 - 17:36 #7
Partial Class _Default
    Inherits System.Web.UI.Page
Sub Page_Load(ByVal Sender As Object, ByVal e As EventArgs)
    Dim thispage As String = Request.QueryString("page")
    Dim writeEmptyPage() As String
    Dim writeSpillePage() As String
    Dim writeBestyrelsePage() As String
    Dim writeUngdomsUdPage() As String
    Dim writeMedlemPage() As String
    Dim writeSponsorPage() As String

    If thispage = "" Then
        writeEmptyPage()
    ElseIf thispage = "atspille" Then
        writeSpillePage()
    ElseIf thispage = "bestyrelsen" Then
        writeBestyrelsePage()
    ElseIf thispage = "ungdomsudvalg" Then
        writeUngdomsUdPage()
    ElseIf thispage = "medlemsskab" Then
        writeMedlemPage()
    ElseIf thispage = "sponsor" Then
        writeSponsorPage()
    End If
End Sub

End Class

metoder skal altid ligge inde i klassen
Avatar billede want2learn Nybegynder
29. april 2006 - 18:03 #8
okay men når det er rettet hvorfor siden den så:
Expression is not a method til alle mine write......Page() i min If, Else, sætning !?
Avatar billede dr_chaos Nybegynder
29. april 2006 - 18:13 #9
Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
Dim thispage As String = Request.QueryString("page")
    Dim writeEmptyPage As String
    Dim writeSpillePage As String
    Dim writeBestyrelsePage As String
    Dim writeUngdomsUdPage As String
    Dim writeMedlemPage As String
    Dim writeSponsorPage As String

    If thispage = "" Then
        writeEmptyPage()
    ElseIf thispage = "atspille" Then
        writeSpillePage()
    ElseIf thispage = "bestyrelsen" Then
        writeBestyrelsePage()
    ElseIf thispage = "ungdomsudvalg" Then
        writeUngdomsUdPage()
    ElseIf thispage = "medlemsskab" Then
        writeMedlemPage()
    ElseIf thispage = "sponsor" Then
        writeSponsorPage()
    End If
End Sub

Jeg ved ikek helt hvad det er du vil men det virker meget asp agtigt og du skal tænke i helt andre baner.

kig evt her for at lære lidt mere om asp.net :
www.asp.net under punktet tutorials
Avatar billede thrytter Nybegynder
29. april 2006 - 19:20 #10
Fejlen "Expression is not a method" skyldes at writeEmptyPage og øvrige ikke er metoder, men oprettet som streng-variabler.

Du bør derfor slette
Dim writeEmptyPage As String
Dim writeSpillePage As String
Dim writeBestyrelsePage As String
Dim writeUngdomsUdPage As String
Dim writeMedlemPage As String
Dim writeSponsorPage As String

og oprette metoder i stil med:

Private Sub writeEmptyPage()
  // Gør et eller andet
End Sub
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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