Visual Basic을 사용하여 XML 파일을 만드는 방법

Question

질문이 있습니다. Visual Studio에서 Visual Basic을 사용하여 XML 파일을 만들고 싶습니다.

XML 파일은 다음과 같이해야합니다 :

<?xml version="1.0" encoding="utf-8"?> 
<Root Name="scenario"> 
    <Entries> 
    <Entry Name="firstname" Value="gedaan" /> 
    <Entry Name="lastname" Value="salame" /> 
    <Entry Name="job" Value="Engineer" /> 
    </Entries> 
</Root> 

내가 조금 다르다 원하는 XML은이 같은 더 뭔가를해야만이 없기 때문에 내가 많이 검색된하지만, 도움이 아무것도 발견 : <FirstName>gedaan</FirstName>, 그 단지 <Entry Name="FirstName" Value="gedaan" />

도와주세요 감사합니다.

Answer 1

나는 이것을 전에했다. 줄 단위로 XML을 인쇄해야합니다. FileSystemObject를 사용하여 빈 .xml 파일을 만듭니다. 그런 다음 .xml을 출력으로 엽니 다. 다음으로 .xml 문자열을 만들고 출력에 인쇄하십시오.

Dim fs as Object 
    Dim strWriteFileName , strWriteLine as string 

    Set fs = CreateObject("Scripting.FileSystemObject") 
    strWriteFileName = Forms!MAIN.OutputFile.value & ".xml" 

    Open strWriteFileName For Output As #1 
     strWriteLine = "<?xml version=""1.0"" encoding=""utf-8""?>" 
     Print #1, strWriteLine 
     strWriteLine = "<Root Name=""scenario"">" 
     Print #1, strWriteLine 
     strWriteLine = "<Entries>" 
     Print #1, strWriteLine 
     'Depending on XML schema here may be a good place for a Loop' 
     strWriteLine = "<Entry Name=""firstname"" Value=""gedaan"" />" 
     Print #1, strWriteLine 
     strWriteLine = "<Entry Name=""lastname"" Value=""salame"" />" 
     Print #1, strWriteLine 
     strWriteLine = "<Entry Name=""job"" Value=""Engineer"" />" 
     Print #1, strWriteLine 
     'And here may be a good place to end the loop' 
     strWriteLine = "</Entries>" 
     Print #1, strWriteLine 
     strWriteLine = "</Root>" 
     Print #1, strWriteLine 
    Close #1 
    set fs = Nothing 

위 내용이 인쇄됩니다. 여러 항목을 추가해야하는 경우 루프를 추가하여 더 많은 이름을 인쇄하십시오. 또한 MAIN이라는 양식과 OutputFile이라는 텍스트 상자를 사용 했으므로 필요에 따라 바꾸십시오.