Connecting Tech Pros Worldwide Forums | Help | Site Map

In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...

.Net Sports
Guest
 
Posts: n/a
#1: Jan 16 '06
In VB.net, I'm trying to do a couple of things in a couple of different
blocks of code. I need to take the first 25 characters of a text file,
then append at the end some ellipses and a MORE link to a webpage where
viewers can read the rest of the article:
This is the first few characters of text from my file.......<a
href="article-to-read.aspx"> MORE </a>
...I also need to do some in file parsing where I start at one known
keyword (START for an example) , grab all the text until , let's say
the next </td>, put it all into a variable, and then be able to use
that variable to display the results of all the text from START to
</td> . IndexOf seems like the builtin function I may need to use, but
having difficulty finding methods and arguments to do in file searching
for this.

thanks
netsports


Peter Bromberg [C# MVP]
Guest
 
Posts: n/a
#2: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


Sorry,
that was C# (I'm VB.NET - challenged) but you get the idea.
Peter

--
Co-founder, Eggheadcafe.com developer portal:
http://www.eggheadcafe.com
UnBlog:
http://petesbloggerama.blogspot.com




".Net Sports" wrote:
[color=blue]
> In VB.net, I'm trying to do a couple of things in a couple of different
> blocks of code. I need to take the first 25 characters of a text file,
> then append at the end some ellipses and a MORE link to a webpage where
> viewers can read the rest of the article:
> This is the first few characters of text from my file.......<a
> href="article-to-read.aspx"> MORE </a>
> ...I also need to do some in file parsing where I start at one known
> keyword (START for an example) , grab all the text until , let's say
> the next </td>, put it all into a variable, and then be able to use
> that variable to display the results of all the text from START to
> </td> . IndexOf seems like the builtin function I may need to use, but
> having difficulty finding methods and arguments to do in file searching
> for this.
>
> thanks
> netsports
>
>[/color]
Peter Bromberg [C# MVP]
Guest
 
Posts: n/a
#3: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


You want to use the Substring method, combined with IndexOf and related for
stuff like this.

string newStr =MyText.Substring(0, 25)
or
string newStr=MyText.Substring(0, MyText.LastIndexOf("<BR>");


Peter
--
Co-founder, Eggheadcafe.com developer portal:
http://www.eggheadcafe.com
UnBlog:
http://petesbloggerama.blogspot.com




".Net Sports" wrote:
[color=blue]
> In VB.net, I'm trying to do a couple of things in a couple of different
> blocks of code. I need to take the first 25 characters of a text file,
> then append at the end some ellipses and a MORE link to a webpage where
> viewers can read the rest of the article:
> This is the first few characters of text from my file.......<a
> href="article-to-read.aspx"> MORE </a>
> ...I also need to do some in file parsing where I start at one known
> keyword (START for an example) , grab all the text until , let's say
> the next </td>, put it all into a variable, and then be able to use
> that variable to display the results of all the text from START to
> </td> . IndexOf seems like the builtin function I may need to use, but
> having difficulty finding methods and arguments to do in file searching
> for this.
>
> thanks
> netsports
>
>[/color]
.Net Sports
Guest
 
Posts: n/a
#4: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


Thanks....

.....can anyone provide a vb.net equivalent?

Kevin Spencer
Guest
 
Posts: n/a
#5: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


The VB.Net equivalent of:

string newStr =MyText.Substring(0, 25)
or
string newStr=MyText.Substring(0, MyText.LastIndexOf("<BR>");

is:

Dim newStr As String =MyText.Substring(0, 25)
or
Dim newStr As String=MyText.Substring(0, MyText.LastIndexOf("<BR>")

......

Kevin Spencer
Microsoft MVP
..Net Developer
You can lead a fish to a bicycle,
but it takes a very long time,
and the bicycle has to *want* to change.

".Net Sports" <ballz2wall@cox.net> wrote in message
news:1137446982.025616.36860@g49g2000cwa.googlegro ups.com...[color=blue]
> Thanks....
>
> ....can anyone provide a vb.net equivalent?
>[/color]


Peter Bromberg [C# MVP]
Guest
 
Posts: n/a
#6: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...



http://www.eggheadcafe.com/articles/...converter.aspx

You might want to bookmark that.
Don't forget to remove illegal characters like in "<BR>"

Peter
--
Co-founder, Eggheadcafe.com developer portal:
http://www.eggheadcafe.com
UnBlog:
http://petesbloggerama.blogspot.com




".Net Sports" wrote:
[color=blue]
> Thanks....
>
> .....can anyone provide a vb.net equivalent?
>
>[/color]
.Net Sports
Guest
 
Posts: n/a
#7: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


Thanks for the input (and converter, Peter)..
..I'm getting a substring not a member of 'System.IO.StreamReader'
error when trying this. And also, I'm not using any type of input
control (for the MyText. prefix)
thanks
netsports

Kevin Spencer wrote:[color=blue]
> The VB.Net equivalent of:
>
> string newStr =MyText.Substring(0, 25)
> or
> string newStr=MyText.Substring(0, MyText.LastIndexOf("<BR>");
>
> is:
>
> Dim newStr As String =MyText.Substring(0, 25)
> or
> Dim newStr As String=MyText.Substring(0, MyText.LastIndexOf("<BR>")
>
> .....
>
> Kevin Spencer
> Microsoft MVP
> .Net Developer
> You can lead a fish to a bicycle,
> but it takes a very long time,
> and the bicycle has to *want* to change.
>
> ".Net Sports" <ballz2wall@cox.net> wrote in message
> news:1137446982.025616.36860@g49g2000cwa.googlegro ups.com...[color=green]
> > Thanks....
> >
> > ....can anyone provide a vb.net equivalent?
> >[/color][/color]

Peter Bromberg [C# MVP]
Guest
 
Posts: n/a
#8: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


Ok, well you'll need to post some sample code so the incredible cadre of
helpful experts here can show how to fix it. Substring is a method on the
string class, has nothing to do with StreamReader.

Example:

Dim xyz as String
xyz="12345678901234567890"
Dim abc as String = xyz.Substring(0,9)

--Peter

--
Co-founder, Eggheadcafe.com developer portal:
http://www.eggheadcafe.com
UnBlog:
http://petesbloggerama.blogspot.com




".Net Sports" wrote:
[color=blue]
> Thanks for the input (and converter, Peter)..
> ..I'm getting a substring not a member of 'System.IO.StreamReader'
> error when trying this. And also, I'm not using any type of input
> control (for the MyText. prefix)
> thanks
> netsports
>
> Kevin Spencer wrote:[color=green]
> > The VB.Net equivalent of:
> >
> > string newStr =MyText.Substring(0, 25)
> > or
> > string newStr=MyText.Substring(0, MyText.LastIndexOf("<BR>");
> >
> > is:
> >
> > Dim newStr As String =MyText.Substring(0, 25)
> > or
> > Dim newStr As String=MyText.Substring(0, MyText.LastIndexOf("<BR>")
> >
> > .....
> >
> > Kevin Spencer
> > Microsoft MVP
> > .Net Developer
> > You can lead a fish to a bicycle,
> > but it takes a very long time,
> > and the bicycle has to *want* to change.
> >
> > ".Net Sports" <ballz2wall@cox.net> wrote in message
> > news:1137446982.025616.36860@g49g2000cwa.googlegro ups.com...[color=darkred]
> > > Thanks....
> > >
> > > ....can anyone provide a vb.net equivalent?
> > >[/color][/color]
>
>[/color]
.Net Sports
Guest
 
Posts: n/a
#9: Jan 16 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


<%Dim mystring As StreamReader =
File.OpenText("c:\inetpub\wwwroot\articles\thefile .txt")
If File.Exists("c:\inetpub\wwwroot\articles\thefile.t xt") = True Then
Do While mystring.Peek() >= 0
dim firsttext as string =Substring(mystring(0,25))
response.write(firsttext.ReadLine())
Loop
mystring.Close()
End If

Peter Bromberg [C# MVP]
Guest
 
Posts: n/a
#10: Jan 17 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


OK. Lets refactor that a bit and clean it up:


Dim mystring as as string = String.Empty
Dim path as String = "c:\inetpub\wwwroot\articles\thefile.txt"
Try
If File.Exists(path) Then
Dim sr As StreamReader = New StreamReader(path)
'This allows you to do one Read operation.
mystring =sr.ReadToEnd()
sr.Close()
Catch e As Exception
' handle the exception
Response.Write ("The process failed: {0}", e.ToString())
End Try
End If
' on mystring, which now holds the entire file contents, you can apply the
Substring method as described earlier.

Hope that helps.


--
Co-founder, Eggheadcafe.com developer portal:
http://www.eggheadcafe.com
UnBlog:
http://petesbloggerama.blogspot.com




".Net Sports" wrote:
[color=blue]
> <%Dim mystring As StreamReader =
> File.OpenText("c:\inetpub\wwwroot\articles\thefile .txt")
> If File.Exists("c:\inetpub\wwwroot\articles\thefile.t xt") = True Then
> Do While mystring.Peek() >= 0
> dim firsttext as string =Substring(mystring(0,25))
> response.write(firsttext.ReadLine())
> Loop
> mystring.Close()
> End If
>
>[/color]
Peter Bromberg [C# MVP]
Guest
 
Posts: n/a
#11: Jan 17 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


And kindly note that as I explained, I obviously remain quite VB.NET
challenged:
the last two lines:
End Try
End If
should be reversed:

End If
End Try

Have you ever thought about C#? :-)
--
Co-founder, Eggheadcafe.com developer portal:
http://www.eggheadcafe.com
UnBlog:
http://petesbloggerama.blogspot.com




".Net Sports" wrote:
[color=blue]
> <%Dim mystring As StreamReader =
> File.OpenText("c:\inetpub\wwwroot\articles\thefile .txt")
> If File.Exists("c:\inetpub\wwwroot\articles\thefile.t xt") = True Then
> Do While mystring.Peek() >= 0
> dim firsttext as string =Substring(mystring(0,25))
> response.write(firsttext.ReadLine())
> Loop
> mystring.Close()
> End If
>
>[/color]
.Net Sports
Guest
 
Posts: n/a
#12: Jan 17 '06

re: In file parsing, taking the first few characters of a text file after a readfile or streamreader file read...


Thanks a bunch for the help, looks like this is getting me on my way.
Yep, I do need to develop C# skills, but I do need more an overall
grasp of .net technologies at the same time.
netsports

Closed Thread