[VB8] Odczytywanie zawartości pliku

atyll · #1 (**permalink**) 12.03.2010, 14:03

Witam, potrzebuję pomocy
Mam Buttona i jak go nacisne, to chcę żeby zedytował plik Sumer.Xml i skopiować kawałek treści do Labela

Oto zawartość Sumer.xml

Cytat:

<?xml version="1.0"?>
<player name="Sumer" account="555333" sex="1" lookdir="3" exp="89308242"

Chcę tylko żeby skopiowało "Sumer" (Bez "") i umiesciło ten tekst w Label

A oto mój nie działający kod :/

Cytat:

Dim sName As String
Dim Sfile As String
Sfile = ("D:/Instalki/xd/AlzOut/New Alzeria/oT/New Alzeria V.1.0.0/data/players/Sumer.xml")
sName = sFile.Substring(sFile.IndexOf("name=""") + 6, sFile.Substring(sFile.IndexOf("name=""") + 6, sFile.Length - (sFile.IndexOf("name=""") + 6)).IndexOf(""""))

NameLabel.Text = sName

Kolor czerwony tylko dla moderacji.

mmmmmmm · #2 (**permalink**) 12.03.2010, 14:40

Kod:

Dim x As New Xml.XmlDocument
x.Load("c:\x.xml")
MsgBox(x.DocumentElement.Attributes("name").Value)

Kolor czerwony tylko dla moderacji.

atyll · #3 (**permalink**) 13.03.2010, 00:40

Wszystko ładnie i pięknie działa, Dziękuje

Tylko mam jeszcze jeden problem, żeby tekst umieściło w innym Formie

Oto moj kod

Cytat:

Dim DeletePath As String
DeletePath = TxtPath.Text
Dim PlayerPath As String
PlayerPath = PlayerNameBox.Text
Dim XmlExt As String
XmlExt = ExtX.Text
Dim Playa As String
Playa = PlayersTxt.Text
If My.Computer.FileSystem.FileExists(DeletePath + Playa + PlayerPath + XmlExt) Then
If MsgBox("Go to edit?", vbYesNo) = vbYes Then

Dim oForm As Edit
oForm = New Edit()
oForm.Show()
oForm = Nothing
Dim NamePlaya As New Xml.XmlDocument
NamePlaya.Load(DeletePath + Playa + PlayerPath + XmlExt)

Edit.NameInfo.Text = (NamePlaya.DocumentElement.Attributes("name").Valu e)
End If

Chodzi mi żeby umiesciło tekst z name="" do form o nazwie Edit.vb, ale ten kod ktory dalem na koncu coś nie chodzi;/

@down
1. Jestem poczatkujący

2. Tego nie wiedziałem, ale i tak + robi to co powinienen
3. A czemu nie, skoro chodzi tak jak powinno?

4. Pierwszy If sprawdza czy plik istnieje
5. Nie rozumiem twojej uwagi ;D

mmmmmmm · #4 (**permalink**) 13.03.2010, 01:42

Co do meritum, to się nie wypowiem, bo mi się VS rozwaliło w domu... Ale mam parę uwag:
1. Napisałeś takiego IF-a, że trudno go przeanalizować. W tym przypadku lepiej będzie (i prościej) zrobić Case
2. Stringi w VB łączy się za pomocą &, a nie +
3. Po co dajesz Stringi w nawiasach?
4. Co ma sprawdzać pierwszy IF?
5. W XMLDocument atrybuty są stringami.

Z grubsza poprawiony kod wygląda tak:

Kod:

Dim Position As New Xml.XmlDocument
Position.Load(DeletePath & Playa & PlayerPath & XmlExt)
Select Case Val(Position.DocumentElement.Attributes("access").Value)
   Case 0: PositionLabel.Text = "Player"
   Case 1, 2: PositionLabel.Text = "Tutor"
   Case 3 To 5 : PositionLabel.Text = "GameMaster"
   Case 6 To 10 : PositionLabel.Text = "God"
End Select

atyll · #5 (**permalink**) 17.03.2010, 00:56

Mam jeszcze jedną prośbę, skoro juz ładuje mi zawartość pliku do TextBoxa, to chce żeby też to zapisywało, wiesz ktoś może jaki byłby kod na buttona?

Aha, i do tego nie chce mi ładowac takich atrybutów jak:
<spawn x="1801" y="300" z="7"/> - chodzi mi żeby ładowało x"" y"" z""

<health now="2705"

oraz <skills><skill skillid="0" level="17" tries="85"/> - chodzi mi żeby załadowalo "level"

@REFRESH
Musze to miec dzis wieczorem, prosze o odpowiedz, odwdziecze sie kontem rapidshare

//Edit by Paczaja.
Edytuj swoje posty, a nie spamuj.

Szybka odpowiedź
Po Twoich działaniach wystąpiły następujące błędy

OK
Weryfikacja obrazka Wiadomość: Kliknij jedną z ikon szybkiej odpowiedzi w postach powyżej w celu aktywacji tego okna. Opcje Zacytować wiadomość podczas odpowiedzi? Dodawanie szybkiej odpowiedzi - Proszę czekać!

Narzędzia wątku	Przeszukaj ten temat
Wersja do druku Wyślij na email	Przeszukaj ten temat: Zaawansowane wyszukiwanie
Wygląd
Wygląd liniowy Wygląd mieszany Wygląd wątkowy

Podobne wątki
Temat	Autor wątku	Forum	Odpowiedzi	Ostatni post/autor
[C++] Wyświetlanie zawartości pliku	lacyon	programowanie	1	23.12.2010 17:24
[VB8] Sciezka pliku	atyll	programowanie	4	10.03.2010 23:51
[C] Odczytywanie z pliku, problem z kompilacja	kamillotop	programowanie	13	26.06.2008 17:17
[C#] - listowanie zawartości pliku	cosik123	programowanie	0	31.05.2008 00:15
[C++] Odczytywanie danych z pliku	si3ben	programowanie	8	29.05.2008 03:01

Wiadomość

Anuluj zmiany