|
Hello,
To read text from a file, here's some sample code: (can also be found in the VB .Net Help, under "reading text from files")
' Create an instance of StreamReader to read from a file.
Dim sr As StreamReader = New StreamReader("TestFile.txt")
Dim line As String
' Read and display the lines from the file until the end
' of the file is reached.
Do
line = sr.ReadLine()
Console.WriteLine(Line)
Loop Until line Is Nothing
sr.Close()
To change it to write to a TextBox/RichTextBox all that you need to do is:
' Create an instance of StreamReader to read from a file.
Dim sr As StreamReader = New StreamReader("TestFile.txt")
Dim line As String
' Read and display the lines from the file until the end
' of the file is reached.
Do
line = sr.ReadLine()
Textbox1.text += line
Loop Until line Is Nothing
sr.Close()
For sending an email, look at: sending mail, examples [Visual Basic] under the index section of the help. The System.Web.Mail is most likely what you will be using
Programmer2k4
My sig:
"The so-called 'Bugs' do not exist, they are merely features hidden by developers with message boxes that say 'An unhandled exception has occurred'." - Programmer2k4
"And it is a professional faux pas to pay someone else to destroy your computer when you are perfectly capable of destroying it yourself." - Roger Wright
I now use my CodeProject Blog!
|
|
|
|
|
I have a table of questions and related to it are a set of choices. My online test that I am creating requires me to pick out the question from a question table and display it on the page.
I am trying to iterate through my DataTable I have created and print out the questions on screen but I get the following error:
System.NullReferenceException: Object reference not set to an instance of an object.
My Code is as follows:
Dim AnswerArray(100) As String
Dim TesterArray(100) As String
Dim WrongArray(100) As String
Dim CorrectArray(100) As Boolean
Dim NumberOfQuestions As Integer
Dim NumberCorrect As Integer
Dim NumberWrong As Integer
Sub Page_Load(sender As Object, e As EventArgs)
if not IsPostBack
GetQuestions()
end if
End Sub
Public Sub GetQuestions()
'Create the SQL Connection
Dim connectionstring As String = "server='(local)'; trusted_connection=true; database='ELearn'"
Dim Oconnection As New SqlConnection (connectionString)
'oConnection.Open()
'Get the questions for the user and fill it into a data adapter
Dim strSQL As String
strSQL = "SELECT * FROM dbo_Private_Questions"
'Dim oCommand As New SqlCommand(strSQL, Oconnection)
Dim ds As System.Data.DataSet = New System.Data.DataSet
Dim da As System.Data.IDbDataAdapter = New System.Data.SqlClient.SqlDataAdapter(strSQL, connectionString)
'da.SelectCommand = oCommand
da.Fill(ds)
'Get the choices for the answer of each question and fill it into a data adapter
Dim choices As String
choices = "SELECT * FROM dbo_Choices"
da.Fill(ds)
'Create data tables for questions and choices so they can be iterated
Dim QuestionsTable As DataTable
QuestionsTable = ds.Tables("dbo_Private_Questions")
Dim ChoicesTable As DataTable
QuestionsTable = ds.Tables("dbo_Choices")
'Create a link between choices and questions
'Firstly get the datacolumn objects from the two datatables, create the relation with these
'columns
Dim parentCol As DataColumn
Dim childCol As DataColumn
parentCol = ds.Tables("dbo_Private_Questions").Columns("QuestionID")
childCol = ds.Tables("dbo_Choices").Columns("QuestionID")
Dim questionRelation As DataRelation
questionRelation = New DataRelation("QuestionLink", parentCol, childCol)
QuestionsTable.ChildRelations.Add(questionRelation)
NumberOfQuestions = 0
Dim questionRow As DataRow
for each questionRow in QuestionsTable.Rows
Dim tr1 As new TableRow
Table1.Rows.Add(tr1)
Dim aCell1 As new TableCell
aCell1.Text = questionRow("Question Text").ToString()
tr1.Cells.Add(aCell1)
AnswerArray(NumberOfQuestions) = questionRow("Answer").ToString()
dim count as integer = 0
Dim choiceRow As DataRow
for each choiceRow in questionRow.GetChildRows(questionRelation)
Dim tr2 As new TableRow
Table1.Rows.Add(tr2)
Dim aCell2 As new TableCell
aCell2.HorizontalAlign = HorizontalAlign.Left
tr2.Cells.Add(aCell2)
Dim cb as new CheckBox
cb.Text = choiceRow("Choice Text").ToString()
cb.ID = "CheckBox" + NumberOfQuestions.ToString() + Convert.ToChar(count + 65)
cb.Visible = true
aCell2.Controls.Add(cb)
next
Next
End Sub
I get the error for the for loop i.e. for each questionRow in QuestionsTable.Rows and also when creating the relation:
parentCol = ds.Tables("dbo_Private_Questions").Columns("QuestionID")
Is there anyone out there who can help sort it.
Thanks
Kav
|
|
|
|
|
ug39kxt@cs.bham.ac.uk wrote:
I get the error for the for loop i.e. for each questionRow in QuestionsTable.Rows and also when creating the relation:
parentCol = ds.Tables("dbo_Private_Questions")Columns("QuestionID")
The code doesn't lend itself to easily finding out so. One of the following is returning null:
ds
ds.Tables("dbo_Private_Questions")
ds.Tables("dbo_Private_Questions")Columns("QuestionID")
So, put some watches in (or debugging statements if you prefer) to find out what part of your statement is returning null.
Cada uno es artifice de su ventura
WDevs.com - Open Source Code Hosting, Blogs, FTP, Mail and Forums
|
|
|
|
|
I have the error always occurs when trying to access the DataTable object in a DataSet:
parentCol = ds.Tables("dbo_Private_Questions").Columns("QuestionID")
childCol = ds.Tables("dbo_Choices").Columns("QuestionID")
for each questionRow in QuestionsTable.Rows
....
for each choiceRow in questionRow.GetChildRows(questionRelation)
...
The error occurs on these 4 lines. Creating the data table doesn't bring an error.
|
|
|
|
|
NB. I am using web matrix - free tool by microsoft - if that is any help
|
|
|
|
|
It's entirely possible that Tables("dbo_Private_Questions") doesn't return a DataTable object. This would mean that there is no table in the DataSet called "dbo_Private_Questions". The same could be true for the Columns collection of that table. Meaning there is no column called "QuestionID" in the Table object. The same could also be true for the DataSet not having a table in it called "dbo_Choices"...
Get the picture yet? Your code is assuming that these table and columns exist in the dataset. You need to write some code in there to check if they actually do exist before you use them.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I have a complete ASP web application. Now I want it to convert to VB.NET application. And the apllication can install in each computer. Is there any fast way to do it without hand by hand coding? PLEASE GIVE ME A HIT OF IT! THANKS A LOT!!
Lisa
|
|
|
|
|
You want to convert and ASP web app to a Windows Forms app? Start coding by hand. AFAIK , there's no tool that will do this, mainly because the execution models are so radically different.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi,
Can someone help me out with this urgent problem I am facing.
I have an Windows service whose components are controlled by a snap-in.
Now I need to create multiple instances of this service and snap-in on the same machine.
I am not able to latch the snap-in the instance I want to though both the instance use different users. The snap-in latches itself to the classed in the service via DCOM.
Excepting a quick reply.
What you cannot visualize you cannot achieve.
|
|
|
|
|
Please tell me what are the difference between RecordSet and ResultSet
|
|
|
|
|
AFAIK the two terms are used interchangably
|
|
|
|
|
hey, anyone know how to spawn the recycle bin window, by using...
diagnostics.process.start("SecretTextIdontKnow")
Im sure it can be done....
|
|
|
|
|
Private Sub MenuOpenRecycleBinOpenClick(ByVal sender As Object, ByVal e As EventArgs)
'"explorer.exe","/root,::{645FF040-5081-101B-9F08-00AA002F954E}"
System.Diagnostics.Process.Start("explorer.exe", "/root,::{645FF040-5081-101B-9F08-00AA002F954E}")
End Sub
Ok i got it nevermind 
|
|
|
|
|
Sorry.. This works much better
System.Diagnostics.Process.Start("explorer.exe", "::{645FF040-5081-101B-9F08-00AA002F954E}")
(removed the "/root," from arguments.
|
|
|
|
|
I need to compress an avi file using a video codec in my application
how can I do this
|
|
|
|
|
I would like to create an application that does not appear in the Windows Task manager and system Try or any other means that might detect its existance
|
|
|
|
|
Can't do it. No matter what you do, the process will show up in the Task List.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi,
I am wiriting a program in visual basic for reading pdf file. I am able to open pdf file but i am loosing all bold,italic,underline text. it appears as a simple text.
Is there any dll or ocx by which i can open a pdf file with all underline,italic,bold text?
Thanks in Advance,
Syed Saba
|
|
|
|
|
Need to syncronize a local folder with a source folder (either from CD or company server by LAN/internet connection as chosen by the user). The idea is that the user's laptop should contain exact same files as the source on CD or server.
I don't yet know how to handle it.
Any ideas and suggestions would be appreciated.
|
|
|
|
|
hi team
i'm using VB.NET 2002 with DB sql server 2000 to build an application with arabic interface , so
when i start my project , the default language is English and i convert to arabic by keyboard so i want to pass this step and start directly with arabic, and when i closed the project return to windows language(English).
i know there is namespace in framework do this task but how.....
please anyone help me as soon as possible
thx
haitham yousri
|
|
|
|
|
To view the full article, please visit
http://www.BetterVssRemoting.com
Better VSS Remote Access Tool
This article makes a detailed comparison among SourceAnyWhere, SourceOffSite, VSS Remoting and possible others.
Keywords: VSS Remote Access, VSS Web Access, VSS Internet Access, SourceSafe Remote Access, SourceSafe Web Access, SourceSafe Internet Access, SourceOffSite, SourceAnyWhere, VSS Remoting
Index
1. Overview
2. Comparison Summary
3. Test Environment
4. Test Methodology
5. Breakdown
5.1 Speed
5.2 Stability
5.3 Security
5.4 VSS Feature Support
5.5 Usability
5.6 Diff/Merge
5.7SCCI Integration
5.8 Cross Platform
6 Others
1. Overview
What does the article do? It makes a comparison among SourceAnyWhere 3.1, SourceOffSite 4.1 and VSS Remoting 2.5.
Our initiative is to make an unbiased, objective, repeatable and verifiable comparison:
a. Real project is used. The project I use is eMule, which is at http://sourceforge.net/projects/emule/
b. Detailed steps are presented. You can follow the detailed steps easily.
c. If you want to make a comment, I can be reached at bettervssremoting@yahoo.com
.
If you need more info, please visit their official websites:
SourceAnyWhere (SAW) from DynamSoft
http://www.dynamsoft.com
SourceOffSite (SOS) from SourceGear
http://www.sourcegear.com
VSS Remoting from Source Remoting
http://www.sourceremoting.com
Want to add a product? Write to me:
bettervssremoting@yahoo.com
The real result may vary if you do the test in different environment or different files are used. However, the basic concept of this comparison, such as which one is the fastest, which one has more VSS features, should be applicable everywhere.
To view the full article, please go to
http://www.bettervssremoting.com
2. Comparison Summary (5 star ***** is the best)
Speed Comparison
SAW *****
SOS **
VSS Remoting **
Stability Comparison
SAW ****
SOS ***
VSS Remoting **
Security
SAW ****
SOS ***
VSS Remoting ***
VSS Feature Support
SAW ****
SOS ****
VSS Remoting ****
Usability
SAW ****
SOS **
VSS Remoting **
Diff/Merge
SAW ****
SOS ****
VSS Remoting **
IDE Integration
SAW ***
SOS ***
VSS Remoting ****
Cross Platform
SAW *
SOS ****
VSS Remoting ***
Speed:
I am totally surprised and excited by the speed of SourceAnyWhere. For Get, Checkout and other operations, SourceAnyWhere can
be up to 40+ times faster than SourceOffSite and VSS Remoting.
Stability:
SourceAnyWhere never has any problem in the whole test.
VSS Remoting has difficulty to add files.
SourceOffSite has several problems when it comes to stability. It fails often when I try to add big files. The big problem of SourceOffSite is cancel. There is no cancel support in IDE integration. After a cancel operation in Add, Checkin, Checkout or Get in SourceOffSite Explorer, the CPU usage of SourceOffSite server goes up to almost 100% and can not come down, unless the server is restarted.
Security:
What makes SourceAnyWhere unique is the password policy.
All the products use 128-bit cryptography.
SourceOffSite and SourceAnyWhere use BlowFish.
VSS Remoting uses HTTPS.
VSS Feature Support:
Weakness and strengths equally exist in them three.
Usability:
SAW is the best. All the Windows of SAW is in Win32 style. It can detect if a file is changed automatically.
Diff/Merge
In File Diff (2-way)/File Merge (3-way), SourceAnyWhere and SourceOffSite run neck and neck; VSS Remoting has a low
performance
IDE Integration:
SourceAnyWhere, SourceOffSite and VSS Remoting all support MSSCCI Integration.
VSS Remoting supports DreamWeaver integration
I have not tested the IDE integration intensively. I give this rate just according to manual of the three products.
Cross Platform:
SourceOffSite can cross most popular platforms, VSS Remoting has a web interface which can login server through web
3. Test Environment
Test Data
Real project is used for test
All eMule0.44c and eMule0.44d files are downloaded from Sourceforge
Download eMule0.44c (3.1M) and eMule0.44d (3.1M) used in the test
Big Files are simulated files created by us
Server Configuration
P4, 2.8G, 256M RAM, Windows XP Professional
SourceAnyWhere profession 3.1 DEMO Server
SourceOffSite4.1 with Cryptography DEMO Server
VSS Remoting Server 2.5
Visual SourceSafe6.0 + Sp6
Client Configuration
P4 Celeron 2.0G, 256M RAM, Windows 2003
ADSL connection
SourceAnyWhere profession 3.1
SourceOffSite 4.1 with Cryptography
VSS Remoting Client 2.5
4. Test Methodology
All the three products are tested on the same computers and internet connection
All the three products are tested on the same data set
All the three products are tested with the same process
For speed test, every action is carried out 5 times
The initial state of the VSS database is empty (newly created)
5. Breakdown
To view the detailed test results and other features, please visit
http://www.BetterVssRemoting.com
|
|
|
|
|
Why do you idiots do this?!
This is a programming forum for Visual Basic! Not a drop zone for your advertising! If you really want to tout your wares, TAKE OUT AN AD and support this site. All your doing by dropping your ads in the forums is making yourself look VERY unprofessional and cheap.
I can tell you I'll never visit your sites now.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi To ALL,
Can any one tell me how to connect to sql server 2000 using windows authentication from vb 6.0
Thanks
Mahesh
|
|
|
|
|
Hi,
My VB6 app needs to store current IE security settings, change them to the program reqmt and at program exit, return back to original settings.
Best way to do it ? Does the same apply when I upgrade to VB.NET ?
Thanks
|
|
|
|
|
The best way to do it is not at all!
Changing the security settings is a VERY BAD IDEA! As a Administrator, I can tell you that if your caught changing secuirty settings, I'll uninstall your application in a heartbeat and trash the installation CD's.
Also, your app will not be able to change the settings on some machines because of Policies. On top of that, on some machines, security settings are global, not user-based. Changing system wide settings on someones machine is NEVER recommended, for the above reason.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
