CAPTURA DE CAMPO

NICKOLASCARLOS 27/01/2014 17:17:42
#433631
Eai pessoal?

Queria saber como pegar o texto dentro de outro. Tipo assim:

Texto: Eu tenho <campo>10</campo> anos

Ai eu queria que me retornasse o valor entre <campo> e </campo>, que no caso é [Ô]10[Ô]

Tentem me ajudar ae!
KERPLUNK 27/01/2014 17:28:43
#433632
Isso me parece parte de um XML...
é isso? Se for, o melhor à fazer é usar desserialização.
NICKOLASCARLOS 27/01/2014 17:37:08
#433634
Citação:

:
Isso me parece parte de um XML...
é isso? Se for, o melhor à fazer é usar desserialização.


Fale mais!
KERPLUNK 27/01/2014 17:51:23
#433635
Veja aqui e aqui
NICKOLASCARLOS 27/01/2014 17:59:36
#433636
Não. não é isso não.

Ex:

Tenho a seguinte string: Eu tenho <campo>10</campo> anos
Eu quero uma função q retorne oq está entre <campo> e </campo> para uma textbox.
é isso ai!
KERPLUNK 27/01/2014 18:14:29
#433637 Resposta escolhida
Ok, de onde vem essa informação?
NICKOLASCARLOS 27/01/2014 18:21:57
#433639
Deixa eu explicar melhor:

Quando vc quer criar criar uma Caixa de mensagem vc escreve: 
msgbox([Ô]seu texto aqui[Ô])
ai o programa te retorna: seu texto aqui. é tipo isso que eu quero fazer. Não prescisa ser nescessariamente o <campo></campo> pode ser até mesmo entre as aspas([Ô])
PEGUDO 28/01/2014 07:43:04
#433652
Cara,
Você deve dar o máximo de informação possível.
No seu arquivo, todos os campos têm as tags <campo> ou só este campo?
Se for só este campo que tenha a tag <campo>, você pode fazer, por exemplo:
Dim campo As String = mid(seu_texto, Instr(seu_texto, [Ô]<campo>[Ô]))

A partir daí você só irá retirar o que você quer.

Se forem vários campos <campo> já é mais complicado.
O que vem antes do campo que você quer? o que vem depois? O campo que você quer vem sempre na mesma linha do arquivo texto?
Enfim... Existem várias maneiras de fazer mas só passar: [Ô]Eu quero o que está entre <campo> e </campo>[Ô], complica.

Um exemplo, utilizando o texto que você passou:
Dim texto As String = [txt-color=#e80000][Ô]Eu tenho <campo>10</campo> anos[Ô][/txt-color]
Dim exemplo As String = mid(texto, InStr(texto, [txt-color=#e80000][Ô]>[Ô][/txt-color]) + 1)
exemplo = mid(exemplo, 1, Instr(exemplo, [txt-color=#e80000][Ô]<[Ô][/txt-color]) - 1)
NICKOLASCARLOS 28/01/2014 13:21:06
#433683
Citação:

:
Cara,
Você deve dar o máximo de informação possível.
No seu arquivo, todos os campos têm as tags <campo> ou só este campo?
Se for só este campo que tenha a tag <campo>, você pode fazer, por exemplo:

Dim campo As String = mid(seu_texto, Instr(seu_texto, [Ô]<campo>[Ô]))

A partir daí você só irá retirar o que você quer.

Se forem vários campos <campo> já é mais complicado.
O que vem antes do campo que você quer? o que vem depois? O campo que você quer vem sempre na mesma linha do arquivo texto?
Enfim... Existem várias maneiras de fazer mas só passar: [Ô]Eu quero o que está entre <campo> e </campo>[Ô], complica.

Um exemplo, utilizando o texto que você passou:
Dim texto As String = [txt-color=#e80000][Ô]Eu tenho <campo>10</campo> anos[Ô][/txt-color]
Dim exemplo As String = mid(texto, InStr(texto, [txt-color=#e80000][Ô]>[Ô][/txt-color]) + 1)
exemplo = mid(exemplo, 1, Instr(exemplo, [txt-color=#e80000][Ô]<[Ô][/txt-color]) - 1)



Cara... O 1º codigo q vc passou deu certo, mas tem um problema, retorna assim: <campo>10</campo> não teria um jeito de excluir o <campo> e </campo> não?
KERPLUNK 28/01/2014 14:06:26
#433688
Pergunta séria: Você quer aprender como fazer ou quer que façamos pra você?
NICKOLASCARLOS 28/01/2014 14:28:01
#433690
Se não me engano o comando(InStr) indica onde começa, como eu faria para indicar o fim?
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar