|
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim fs As New FileStream("c:\ashu\connection23.doc", FileMode.Create, FileAccess.Write)
Dim s As New StreamWriter(fs)
s.WriteLine("server=192.168.1.18;database=demo;uid=sa;password=pulsar180;")
's.WriteLine("Tell me about urself")
s.Close()
fs = New FileStream("c:\ashu\connection23.doc", FileMode.Open, FileAccess.Read)
Dim d As New StreamReader(fs)
d.BaseStream.Seek(0, SeekOrigin.Begin)
While d.Peek() > -1
RichTextBox1.Text &= d.ReadLine()
End While
d.Close()
End Sub
End Class
Think Positive
Ashu Gupta
codeproject.com
|
|
|
|
|
Hi,
when the user logs in i show the member's navigation bar but when they click browser back they loose the member navigation. how can i display the member navigation bar even they click browseback once they login and only loose that bar once they click logout.
i dont know but i have seen lots of website done like this before i am trying to do this in asp please help.
thanks in forward.
|
|
|
|
|
Hi,
I have a drop down menu and need to put it into a frameset. The dropdown menu always be cut off by other frames. How can I make it cross frames?
Thanks a lot!
|
|
|
|
|
I need to figure out how you load forms in VB.net, like you do in VB6... Say I have Form1 and Form2.. Form1 has a button... within that button there is the code: "Form2.show"... it will not do this... using intellisense, it does not have Show as a possible syntax to Form2.... yet if i go to Form2 and use Me.Show, it will recognize it then... im still in the conversion stages and any help would be appreciated...
"Love, Life and Option Explicit"
|
|
|
|
|
It was a problem to me when I switched from VB6 to VB.Net
Read this article
http://www.developerfusion.co.uk/show/4375/9/[^]
Regards,
Chatura Dilan
If at first you don't succeed, try; try again, so that you know
what not to do the next time. The answer is out there.
|
|
|
|
|
I am used to there being a button in my Properties Window in VS.NET which I click to show me the events for the selected control. I don't seem to have that. How to I get it back?
Thanks,
Mark Mokris
|
|
|
|
|
Install whatever add-on put it there. It doesn't come standard in Visual Studio.
THe other place to see the events would be the top of the code editor window. Just select the component you want to see on the left and the list of events will show up in the drop down on the right.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
HELP!!
I need to resize jpeg files in a directory.
When I resize them in Picture Manager (Office 2003) they show on our webshop.
When I use the code below, the image is not shown.
In Photoshop I cannot open them either!!
Can you give me a solution to do this for a Windows Forms application (VB.NET)
Thanks in advance.
Dennis
' Get the scale factor.
Dim scale_factor As Single = _
Single.Parse("0,332")
' Get the source bitmap.
Dim bm_source As New Bitmap(picSource.Image)
' Make a bitmap for the result.
Dim bm_dest As New Bitmap( _
CInt(bm_source.Width * scale_factor), _
CInt(bm_source.Height * scale_factor))
' Make a Graphics object for the result Bitmap.
Dim gr_dest As Graphics = _
Graphics.FromImage(bm_dest)
' Copy the source image into the destination bitmap
gr_dest.DrawImage(bm_source, 0, 0, _
bm_dest.Width + 1, bm_dest.Height + 1)
' Display the result.
picDest.Image = bm_dest
bm_dest.Save("c:\16344test.jpg")
|
|
|
|
|
Protected Sub btnCommit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCommit.Click
Dim ra As Integer
Dim MyConn As New System.Data.OleDb.OleDbConnection(Connstring)
MyConn.Open() ' open connection
Dim MySql As String = "Insert into ExpenseReport _
(DateRow1,WhomRow1,CCardAmountRow1,PCardAmountRow1,CashAmount,VehicleNumRow1,ProjectnameRow1, _
TypeofExpenseRow1) values " & tbxDate.Text.ToString & "," & tbxWhom.Text.ToString & "," & _
tbxCCard.Text.ToString & "," & tbxPCard.Text & "," & tbxCash.Text & "," & tbxVehicle.Text & "," & _
tbxProject.Text.ToString & "," & ddnExpense.SelectedValue.ToString
Dim command As New System.Data.OleDb.OleDbCommand(MySql, MyConn)
ra = command.ExecuteNonQuery()
MyConn.Dispose()
Response.Write("New Row inserted" & ra)
End Sub
End Class
Can someone tell me why I'm getting a insertion syntax error when trying to run this code.
My db has those exact fields.
This is an access db by the way if that matters.
thanks for the help
Win32newb
"Programming is like Sex, make a mistake and you end up providing support for a long time"
|
|
|
|
|
try this....
in ur code page in the top of the page wrie
Imports System.Data.oledb
like this...
Imports System.Data.oledb<br />
Public Class Form1<br />
Inherits System.Windows.Forms.Form
and in ur button
Protected Sub btnCommit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCommit.Click<br />
<br />
Dim MySql As as new oledbcommand<br />
mysql.Connection = OleDbConnection1<br />
oledbconnection1.Open() ' open connection<br />
<br />
my sql.commandtext = "Insert into ExpenseReport _ <br />
(DateRow1,WhomRow1,CCardAmountRow1,PCardAmountRow1,CashAmount,VehicleNumRow1,ProjectnameRow1, _ <br />
TypeofExpenseRow1) values( " tbxDate.Text.ToString & "," & tbxWhom.Text.ToString & "," & _ <br />
tbxCCard.Text.ToString & "," & tbxPCard.Text & "," & tbxCash.Text & "," & tbxVehicle.Text & "," & _ <br />
tbxProject.Text.ToString & "," & ddnExpense.SelectedValue.ToString)<br />
<br />
mysql.ExecuteNonQuery()<br />
oledbconnection1.close()<br />
End Sub<br />
End Class<br />
that if u create ur connectin by the wizard and as i know the wizard allready will give u name of ur connection as (oledbconnection1)
i hope that will work
rusashksa@yahoo.com
Sally<<<>>>tAkE mE 2 uR pAraDiSe<<<>>>Sally
|
|
|
|
|
No offense but I see no difference in the code you posted than that of mine.
ONly things is your making it a shortcut by using Imports System.Data.oledb
and your making a Oledbconnection which is what I'm doing in my code
the connection string is write all that works
the issue is the insert string.
I use this same syntax with other dataaccess the only problem is the insert string its formated wrong and i'm not sure what i'm doing wrong.
Win32newb
"Programming is like Sex, make a mistake and you end up providing support for a long time"
|
|
|
|
|
MeterMan wrote: Dim MySql As String = "Insert into ExpenseReport _
(DateRow1,WhomRow1,CCardAmountRow1,PCardAmountRow1,CashAmount,VehicleNumRow1,ProjectnameRow1, _
TypeofExpenseRow1) values " & tbxDate.Text.ToString & "," & tbxWhom.Text.ToString & "," & _
tbxCCard.Text.ToString & "," & tbxPCard.Text & "," & tbxCash.Text & "," & tbxVehicle.Text & "," & _
tbxProject.Text.ToString & "," & ddnExpense.SelectedValue.ToString
I've seen this WAY too many times... Junk like this just leads to problems that are difficult to find and opens you up to Injection attacks.
You can avoid this by using Parameterized Queries instead. Search the articles for "Sql Injection Attacks" and you'll find a great article by Colin Angus Mackay, which will detail how to do this.
Anyway, you're missing some quote marks, concantenation characters (&), parenthesisin the SQL statements, ..., and it just bugs the #&@% out of me to see people calling .ToString() on a Text property. Text returns a String, so why call .ToString() on a String?!?!?
Dim MySql As String = "Insert into ExpenseReport " & _
"(DateRow1, WhomRow1, CCardAmountRow1, PCardAmountRow1, " & _
"CashAmount, VehicleNumRow1, ProjectnameRow1, TypeofExpenseRow1)" & _
" values (" & tbxDate.Text & "," & tbxWhom.Text & "," & _
tbxCCard.Text & "," & tbxPCard.Text & "," & tbxCash.Text & "," & _
tbxVehicle.Text & "," & tbxProject.Text & "," & _
ddnExpense.SelectedValue.ToString() & ")"
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Thanks for the reply and also the word of warning on injects I will read that.
One question. How do you make the page accept the changed values n a dropdownbox only when you hit commit button.
Basically ddnExpense.SelectValue is changed and the other values are put into the text boxes but the pages has no idea what the value of ddnExpense is because it hasn't postedback. The thing is I don't want it to post back when i make a change in the dropdown because then Id loose all the data in my other fields.
Any help on this would be great.
Win32newb
"Programming is like Sex, make a mistake and you end up providing support for a long time"
|
|
|
|
|
hello friends....how r u?
well i've 3 tables in access and i wanna connect with them by vb.net .....any help plzzzzzzzzzzz
see my codes...
in buttun btnsearch , i used select command to search about information about patiend by his name then display that in textboxes as......
Private Sub Btnsearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnsearch.Click<br />
Dim Sel As New OleDbCommand<br />
Dim R As OleDbDataReader<br />
Sel.Connection = OleDbConnection1<br />
Sel.CommandText = "select* from [patients appointment] where ([patient_name]=" & TxtName.Text & ")"<br />
OleDbConnection1.Open()<br />
R = Sel.ExecuteReader<br />
If R.Read Then<br />
TxtName.Text = R.GetValue(0)<br />
TxtFleNum.Text = R.GetValue(1)<br />
TxtDate.Text = R.GetValue(2)<br />
TxtDoName.Text = R.GetValue(3)<br />
TxtClinic.Text = R.GetValue(4)<br />
TxtNote.Text = R.GetValue(5)<br />
Else<br />
MsgBox("we can't find any date about the selected name")<br />
End If<br />
OleDbConnection1.Close()<br />
R.Close()<br />
End Sub
well... i used up to search about patient and display his information from 1 table, but that patient have another information in another table and i wanna display that in textbox...how can i do that in button of search??
i hope u understood me and i can find answers
Sally>>>><<<<take me="" 2="" ur="" paradise="">>>><<<
|
|
|
|
|
Hi,
I've got a rather old DLL (built with VS2003) that compiles properly with the 'Multi byte
charset' option under VS2005. Now, I cannot call any functions of this dll
out of a VB .net application (would need 'Use Unicode' option for that..).
As I do not want to rewrite the whole application for unicode usage: Is there
any way to call functions out of this DLL in a .net 2.0 application?
Thanks,
Peter
|
|
|
|
|
hi.
how i can datagrid receive barcode from barcode-scanner.
how i can my application receive callerid from linephone
please please sample code and details.please
123
|
|
|
|
|
The barcode scanners ive used in the past have all had an API (usually a COM control) used for capturing data from a scanner.
no idea what a linephone is
|
|
|
|
|
|
What do you mean when you are saying that it highlights the line? What is happening? What is the problem?
---
b { font-weight: normal; }
|
|
|
|
|
Hi Campbells,
I think u r right.
Access has a limited data holding capacity than SQL of not more than 10,000 records per table.
Thanx & Regards.
Success is not a Destination,
... But a Journey !!
|
|
|
|
|
Hi Vikrant
I'm not sure about the limitation you mentioned about access since I already have an access database having a table of more than 11,500 records...
|
|
|
|
|
Hi, I'm uninstalling VS 2003 so that I can Install VS 2005 Pro.
(This is happening as I type)
It's been on this[^] screen for about an hour.
How can I speed it up?
Did it crash?
|
|
|
|
|
Hard to tell.
Try restartign the uninstall program.
btw: you do know you can have VS 2003 and VS 2005 on the same machine?
--------------------------------------------------------
My development blog
Q:What does the derived class in C# tell to it's parent?
A:All your base are belong to us!
|
|
|
|
|
I killed the process which apparantly corrupted the uninstallation coz now none of the setup's function works.
Cant add/remove components, can't repair vs, can't uninstall.
Oh and my IIS is very unstable, again.
Who's joining me? I'm going to Bill Gate's house tonight to throw out all his windows!!
Thank for the tip, at least I can install VS 2005 then!
|
|
|
|
|
For future reference, there is a forum here dedicted to VS issues. This forum is more VB/VB.NET coding issues.
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
