VB.NET Programmering

husk sender as Object, e as EventArgs

altså

Private Sub Page_Load(sender as Object, e as EventArgs)

nu ser det sådan her ud

Private Sub Page_Load(sender as Object, e as EventArgs)
Dim phisk01 As XmlDocument =  LoadXmlDocument("http://192.168.1.1/notes1.xml")...

men det virker ik rigtigt!

hvilken fejl får du?

bar standard .NET

Runtime Error

Server Error in '/' Application.
--------------------------------------------------------------------------------

Runtime Error
Description: An application error occurred on the server. The current custom error settings for this application prevent the details of the application error from being viewed remotely (for security reasons). It could, however, be viewed by browsers running on the local server machine.

Details: To enable the details of this specific error message to be viewable on remote machines, please create a <customErrors> tag within a "web.config" configuration file located in the root directory of the current web application. This <customErrors> tag should then have its "mode" attribute set to "Off".


<!-- Web.Config Configuration File -->

<configuration>
    <system.web>
        <customErrors mode="Off"/>
    </system.web>
</configuration>


Notes: The current error page you are seeing can be replaced by a custom error page by modifying the "defaultRedirect" attribute of the application's <customErrors> configuration tag to point to a custom error page URL.


<!-- Web.Config Configuration File -->

<configuration>
    <system.web>
        <customErrors mode="RemoteOnly" defaultRedirect="mycustompage.htm"/>
    </system.web>
</configuration>

det skal lige siges at
Panelsne ser sådan her ud!

<asp:label id="label1_1" runat="server" />
osv...

hvis det er til hjælp så har jeg en version af det samme bar i C#..

og det fungere... men ville lave det i VB.. men det gik jo ik helt.. men måske i så kan omsætte det til VB!

du KUNNE jo også gøre hvad erroreren beder dig om !!!

lav en web.config fil i dir'et hvor du kører aspx siden fra og skriv

<configuration>
    <system.web>
        <customErrors mode="Off"/>
    </system.web>
</configuration>

i den !

<%@ Page Language="c#"  %>
<%@ Import Namespace="System.Xml" %>
<script runat="server" language="c#">

    public XmlDocument LoadXmlDocument(string path)
    {
        XmlDocument doc = new XmlDocument();
        doc.Load(path);
        return doc;
    }

    string GetXMLNode(XmlDocument doc, string name)
    {
        return doc.DocumentElement.SelectSingleNode("descendant::" + name).OuterXml;
    }

    void Page_Load()
    {
        XmlDocument phisk01 = LoadXmlDocument("http://192.168.1.1/notes1.xml");
        XmlDocument phisk02 = LoadXmlDocument("http://192.168.1.1/notes2.xml");
        XmlDocument phisk03 = LoadXmlDocument("http://192.168.1.1/notes3.xml");
        XmlDocument phisk04 = LoadXmlDocument("http://192.168.1.1/notes4.xml");
       
        label1_1.Text = GetXMLNode(phisk01, "Item_0");
        label1_2.Text = GetXMLNode(phisk01, "Item_1");
        label1_3.Text = GetXMLNode(phisk01, "Item_2");
        label1_4.Text = GetXMLNode(phisk01, "Item_3");
        label1_5.Text = GetXMLNode(phisk04, "Item_0");
   
        label2_1.Text = GetXMLNode(phisk02, "Item_0");
        label2_2.Text = GetXMLNode(phisk02, "Item_1");
        label2_3.Text = GetXMLNode(phisk02, "Item_2");
        label2_4.Text = GetXMLNode(phisk02, "Item_3");
        label2_5.Text = GetXMLNode(phisk04, "Item_1");

        label3_1.Text = GetXMLNode(phisk03, "Item_0");
        label3_2.Text = GetXMLNode(phisk03, "Item_1");
        label3_3.Text = GetXMLNode(phisk03, "Item_2");
        label3_4.Text = GetXMLNode(phisk03, "Item_3");
        label3_5.Text = GetXMLNode(phisk04, "Item_2");
    }
</script>

Jeg tror jeg har fixet den faktisk!

har skrevet DIM ud for hver XmlDocument phisk04 = LoadXmlDocument("http://192.168.1.1/notes4.xml");

altså:
Dim phisk01 As XmlDocument =  LoadXmlDocument("http://192.168.1.1/notes1.xml")
Dim phisk02 As XmlDocument =  LoadXmlDocument("http://192.168.1.1/notes2.xml")
Dim phisk03 As XmlDocument =  LoadXmlDocument("http://192.168.1.1/notes3.xml")
Dim phisk04 As XmlDocument =  LoadXmlDocument("http://192.168.1.1/notes4.xml")

ja nu virker det.. tak for hjælpen elles.. skal vi ik dele de 60 point 20 til hver?

så læg lige et svar.. takZA!

Oui oui, mongsjør...

cyberfessor > så venter vi kun på dig!

Nå cyberfessor du må få dine point tilgode til en anden gang.. jeg lukker nu..!