Solved

Modify record in xml from code behind on page load and unload events

Posted on 2009-04-06
2
295 Views
Last Modified: 2013-12-17
When my web page opens, I want it to modify a value in an xml file based on what's in its Page.Title, and when the page unloads, modify that value to "Not Broadcasting". I'm having a real hard time figuring this one out--I am going about this all wrong!  Is there an Expert here that can help?
--------###CODE BEHIND###--------

Dim hashTableData As New Hashtable

Dim strWebcastName As String
 

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        If Not Page.IsPostBack Then

            'Reading xml file

            Dim doc As System.Xml.XmlDocument = New System.Xml.XmlDocument()

            doc.Load(Server.MapPath("~/App_Data/WebcastDemos.xml"))

            Dim list As System.Xml.XmlNodeList = doc.SelectNodes("Records/Record")

            For Each node As System.Xml.XmlNode In list

                hashTableData(node.Item("ID").FirstChild.Value) = node.Item("Data").FirstChild.Value

            Next

            ViewState("Records") = hashTableData

        End If
 

        ' we do this to avoid multiple cast

        Dim myTable As Hashtable = CType(ViewState("Records"), Hashtable)

    End Sub
 

    Protected Sub Page_LoadComplete(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.LoadComplete

        strWebcastName = Page.Title

        Me.ModifyRecord()

    End Sub
 

    Protected Sub Page_Unload(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Unload

        strWebcastName = "Not Broadcasting"

        Me.ModifyRecord()

    End Sub
 

    Private Sub ModifyRecord()

        Dim key As String = ViewState("HashKey")
 

        CType(ViewState("Records"), Hashtable)(key) = strWebcastName
 

        Dim doc As System.Xml.XmlDocument = New System.Xml.XmlDocument()

        doc.Load(Server.MapPath("~/App_Data/WebcastDemos.xml"))
 

        Dim myNode As System.Xml.XmlNode = doc.SelectSingleNode("Records/Record[ID='" & key & "']")

        myNode("Data").InnerText = strWebcastName
 

        doc.Save(Server.MapPath("~/App_Data/WebcastDemos.xml"))

    End Sub

Open in new window

0
Comment
Question by:John Account
2 Comments
 
LVL 11

Accepted Solution

by:
anuragal earned 500 total points
Comment Utility
Where you have set the value of ViewState("HashKey") ??
Anurag

0
 

Author Comment

by:John Account
Comment Utility
I haven't. And I think the ViewState("HashKey") is completely unnecessary in this scenario, No? I mean, all I want to do is write to and modify a certain field in a certain record of the xml file, when opening the page, and then again when closing the page. So I shouldn't even need a ViewState, right? Just need a way to modify the value directly. Can you help?
0

Featured Post

Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

Join & Write a Comment

Suggested Solutions

More often than not, we developers are confronted with a need: a need to make some kind of magic happen via code. Whether it is for a client, for the boss, or for our own personal projects, the need must be satisfied. Most of the time, the Framework…
Parsing a CSV file is a task that we are confronted with regularly, and although there are a vast number of means to do this, as a newbie, the field can be confusing and the tools can seem complex. A simple solution to parsing a customized CSV fi…
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…
This tutorial demonstrates a quick way of adding group price to multiple Magento products.

771 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now