By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
434,739 Members | 2,059 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 434,739 IT Pros & Developers. It's quick & easy.

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

P: n/a
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

Jan 16 '06 #1
Share this Question
Share on Google+
11 Replies


P: n/a
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:
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

Jan 16 '06 #2

P: n/a
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:
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

Jan 16 '06 #3

P: n/a
Thanks....

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

Jan 16 '06 #4

P: n/a
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" <ba********@cox.net> wrote in message
news:11*********************@g49g2000cwa.googlegro ups.com...
Thanks....

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

Jan 16 '06 #5

P: n/a

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:
Thanks....

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

Jan 16 '06 #6

P: n/a
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:
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" <ba********@cox.net> wrote in message
news:11*********************@g49g2000cwa.googlegro ups.com...
Thanks....

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


Jan 16 '06 #7

P: n/a
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:
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:
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" <ba********@cox.net> wrote in message
news:11*********************@g49g2000cwa.googlegro ups.com...
Thanks....

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


Jan 16 '06 #8

P: n/a
<%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

Jan 16 '06 #9

P: n/a
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:
<%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

Jan 17 '06 #10

P: n/a
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:
<%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

Jan 17 '06 #11

P: n/a
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

Jan 17 '06 #12

This discussion thread is closed

Replies have been disabled for this discussion.