tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: INIファイルのかわりは?
投稿日: 2003/11/25(Tue) 09:28
投稿者JYUN
[OSのVer]:Windows    [VBのVer]:VB.NET  
いろいろ調べて以下の様にやってみたのですが、書込んだ後、コメントが
消えてしまうのですがどうしてなのでしょうか?

[XML ファイル]
<?xml version="1.0" encoding="shift_jis" standalone="yes"?&g
t;
<INK>
  <!-- AAA -->
  <System>
    <AppPath>D:\Release\</AppPath>
  </System>
</INK>
-----------------------------------------------------------------
[書込み]
Call WriteXmlString("System", "AppPath", gintStartCt.ToString)

Public Function ReadXmlString(ByVal MainKey As String, ByVal SubKey As String, _
   ByVal DefString As String) As String

        Dim FilePath As String
        Dim dsXml As DataSet

        Try
            FilePath = gstrAppPath & gcstrAppName & ".xml"
            dsXml = New DataSet("XML")
            dsXml.ReadXml(FilePath)
            Return dsXml.Tables(MainKey).Rows(0).Item(SubKey).ToString
        Catch ex As Exception
            Return DefString
        Finally
            dsXml.Dispose()
        End Try

End Function
-----------------------------------------------------------------------------

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。