Visual Basic

17-Oct-06 8:34

You would have to change your Windows Theme for that. Even then, the buttons wouldn't be the same on another computer.

Re: glass buttons

Dave Kreskowiak17-Oct-06 9:47

Application Deployment Question

17-Oct-06 9:47

At the very least, you'd have to supply your own code to draw the buttons. You'd have to inheirt from the Button class and override the Paint method, supplying the drawing code to draw the button in both the raised and pushed states. This has the added advantage of not being dependant on the machine having a theme installed.

Dave Kreskowiak
Microsoft MVP - Visual Basic

ranro200616-Oct-06 19:07

ranro2006

16-Oct-06 19:07

This might see might seem like a silly question, but I have never deployed a VB.Net application. My application has a database and the connection string
for that database is
"Data Source=.\SQLEXPRESS;AttachDbFilename=
C:\Documents and Settings\Me\My Documents\Visual Studio 2005\Projects\test1\test1\Database1.mdf;
Integrated Security=True;User Instance=True"

Now when I go to deploy my application and put it on another persons computer will the database still be there
even though the connection string ties it to the My Documents folder on my C: drive?

Re: Application Deployment Question

shreekar16-Oct-06 19:21

shreekar

16-Oct-06 19:21

It will still be on your machine - yes, but not on the user's machine Wink | ;)

Why don't you use some non user specific path like D:/Data or even better, store it in a folder under your application like
C:/program files/app name/Data

And in app.config, use "data\Database1.mdf" as the DB name and pre fix that with the application path?
When you are creating the installation package, you can instruct the installer to create the directory named "Data" under your application path and copy the database to it.

Hope this helps.

Shreekar
http://shreekarishere.blogspot.com

rollback issue - setup & deployment project of VS.Net 2003

Najmunnisha16-Oct-06 18:30

Najmunnisha

16-Oct-06 18:30

hi,
how do i rollback the actions that are performed in the install and uninstall methods of Installer Class?

do i use custom action for Rollback? or do i write the customized code for it in the Install/Uninstall methods?

my code is as below :

<runinstaller(true)> Public Class Installer1
Inherits System.Configuration.Install.Installer

Dim dirName As String
Dim regAsmPath As String
Dim args As String
dirName = Me.Context.Parameters.Item("DIRNAME")

regAsmPath = Me.Context.Parameters.Item("REGASMPATH")

args = "/tlb: Travelers.CS.CLREL.FTP.tlb " & Chr(34) & dirName & "Travelers.CS.CLREL.FTP.dll" & Chr(34) & " /codebase /silent"

Dim processStartInfo As New ProcessStartInfo(regAsmPath)
processStartInfo.Arguments = args
processStartInfo.WindowStyle = ProcessWindowStyle.Hidden
Process.Start(processStartInfo)
End Sub

i am using the installer class to do the registration of dlls and creation of type library.

what i want to do is, in case there is some exception in Process.Start() or if the RegAsm.exe is unavailable/corrupt etc. then the whole installation process must be rolled back.

hope i am clear in explaining my problem here Smile | :)

plz help.. its urgent!

thanx.

Najmun

how to insert image into sql database table

vrk_raju16-Oct-06 14:56

vrk_raju

16-Oct-06 14:56

how to insert the pic into the database table..

str_insert = "INSERT INTO SIS_TeachingStaff VALUES('TSMT2','V.RAJANIKANTH','LECTURER','TEACHING STAFF','Msc(Maths)','" & Emp_pic.Image & " '" '" & CByte(Me.opendialogbox.FileName.Length) & "' "

cmd = New SqlCommand(str_insert, conn)
cmd.Connection = conn
cmd.ExecuteNonQuery()

error is:operator '&' is not defined for types 'string' and 'system.drawing.image'

Re: how to insert image into sql database table

adairjk16-Oct-06 18:51

adairjk

16-Oct-06 18:51

The error appears to be generated by a problem with the quotes between ...Image and CByte...

Re: how to insert image into sql database table

shreekar16-Oct-06 19:23

shreekar

16-Oct-06 19:23

As pointed out, the error is because you are trying to concat a string and an image. What you need to do is convert the image into byte array and insert it into the database field. If you google for that, you should be OK.

Shreekar
http://shreekarishere.blogspot.com

Re: how to insert image into sql database table

vrk_raju17-Oct-06 4:54

vrk_raju

17-Oct-06 4:54

sreekar please give code for converting the image into array byte...pl urgent.

Label inside Rectangle

adairjk16-Oct-06 11:39

adairjk

16-Oct-06 11:39

I am trying to add a month view calendar that will display the time and description of the event within each day (using VB.NET 2005). My current attemt is to draw a series of rectangles and place text within each. I am able to create my calendar, put the day inside each box...so the calendar is there. My problem is placing a label, text, etc. within each box to display the event. I would also need to be able to double-click the item and open a form containg the detail for the item. If someone could point me in the right direction (even if it means starting over and taking a new path) I would greatly appreciate it.

Many thanks in advance.

-- modified at 21:55 Monday 16th October, 2006

Re: Label inside Rectangle

Dave Sexton16-Oct-06 20:52

Dave Sexton

16-Oct-06 20:52

You can create them dynamically in code. Declare the label outside of any subs using the "WithEvents" keyword - this will allow you to attach a double-click event to the label through making use of the AddHandler method.

You will have to add your own code to determine how many labels you'll need, I've just used a loop to demonstrate.

Private WithEvents lblEvent As Label

Private Sub MySub()'dynamically add labels
Dim i As Integer
Do Until i = 30
lblEvent = New Label
lblEvent.Text = "Event Label " & i.ToString
AddHandler lblEvent.DoubleClick, AddressOf lblEvent_DoubleClick
'add the label to a control
Me.Controls.Add(lblEvent)
Loop
End Sub

Private Sub lblEvent_DoubleClick(ByVal sender As Object,  _
ByVal e As System.EventArgs) Handles lblEvent.DoubleClick
'add processing here
End Sub

urgent::System.Net.Sockets

harshActsw16-Oct-06 8:50

16-Oct-06 8:50

i ve an FTP connection. I need the program to check on the FTP connection , and if it doesnt connects within 15 mins terminate the connection,
How can this be performed for System.Net.Sockets

Thanks
harsh

Dave Kreskowiak16-Oct-06 9:21

16-Oct-06 9:21

What do you "in 15 minutes"?? Are you writing the server or the client portion? If server, are you referring to waiting only 15 minutes for a connection from an FTP Client app?

Dave Kreskowiak
Microsoft MVP - Visual Basic

harshActsw16-Oct-06 10:04

16-Oct-06 10:04

i want the program to try for 15 minutes for establishing a connection. even after 15 mins Connection is not established, the attempt shd be aborted.

UltraCoder16-Oct-06 9:34

16-Oct-06 9:34

This should do it:

<br />
ConnectTimer.Interval = "900000"    '15 minutes<br />
If System.Net.Sockets.SocketInformationOptions.Listening Then<br />
ConnectTimer.Enabled = True<br />
Else<br />
ConnectTimer.Enabled = False<br />
End If<br />
<br />
Private Sub ConnectTimer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ConnectTimer.Tick<br />
Dim Shutdown As SocketShutdown<br />
Dim DisConnectNet As TransmitFileOptions<br />
Shutdown= Net.Sockets.SocketShutdown.Both<br />
DisConnectNet = TransmitFileOptions.Disconnect<br />
End Sub<br />

harshActsw16-Oct-06 10:19

16-Oct-06 10:19

hi,

When i used " System.Net.Sockets.SocketInformationOptions.Listening" in my code its is showing error that:: SocketInformationOptions is not a member of Sockets.

UltraCoder16-Oct-06 11:02

16-Oct-06 11:02

Ok. Try using this:

<br />
Dim Listen As SocketInformationOptions<br />
If Listen = Net.Sockets.SocketInformationOptions.Listening Then<br />
'Code Goes Here<br />
End If<br />

If this doesn't work, try inserting Imports System.Net.Sockets into the very top of your code above the beginning of your Class.

-- modified at 18:25 Monday 16th October, 2006

harshActsw16-Oct-06 12:32

16-Oct-06 12:32

i found that this enumeration is new in the .NET Framework version 2.0.

i was using .net 1.1 .
sorry i didnt inform this earlier.

is there any option in .net 1.1 which is equivalent.

UltraCoder16-Oct-06 12:51

16-Oct-06 12:51

No, you cannot use System.Net.Sockets or anything Similar in .Net 1.1. You could try (if you use Vb6) downloading Visual Basic Studio 2005 Express and getting the .Net Framework 2.0 along with it. Otherwise, you probably won't be able to finish you're project.

Sorry.

Listbox properties ( Listbox1.Items.Item(i) )

Newbie_dydy8516-Oct-06 8:43

Newbie_dydy85

16-Oct-06 8:43

I am a newbie in learning vb.net. Hope any would give me a hand of the problem. Here is the problem, i need to get all the data inside the listbox ad update to database. So, i use a for loop to save into database. But the data in the listbox can't be retrieved. I am very frustrated with this any help would be appreciated. Thanks.

Dim i As Integer = 1
Dim j As Integer = lbStockID.Items.Count - 1
For i = 1 To j
Dim stockcode As String = lbStockID.Items.Item(i)
Dim quantity As string = lbQuantity.Items.Item(i)

//Establish connection
Dim ConnInsSalesD As New SqlConnection("Password=''; Persist Security Info=True;User ID='sa';Initial Catalog=FYP;Data Source='.'")

Dim strInsSalesD As String
strInsSalesD = "Insert into SalesDetails Values('" & SDID & "','" & quantity & "','" & lblSID.Text & "','" & stockcode & "')"

ConnInsSalesD.Open()
Dim cmdInsSalesD As New SqlCommand(strInsSalesD, ConnInsSalesD)
cmdInsSalesD.ExecuteNonQuery()
ConnInsSalesD.Close()
Next i

Dave Kreskowiak16-Oct-06 9:19

16-Oct-06 9:19

What's the problem? "But the data in the listbox can't be retrieved" doesn't tell us anything. Does it work on one line and not the other? Does it retrieve the wrong value? Were there any error messages?

Your code says that there are TWO ListBoxes, not one. Is this correct?

Dave Kreskowiak
Microsoft MVP - Visual Basic

Newbie_dydy8516-Oct-06 11:46

Newbie_dydy85

16-Oct-06 11:46

Thanks for reply.
Yes, actually i need to store all the data from both listbox into the database, but the both line

Dim stockcode As String = lbStockID.Items.Item(i)
Dim quantity As string = lbQuantity.Items.Item(i)

give me the error message : Value of type 'System.Web.UI.WebControls.ListItem' cannot be converted to 'String'.

So what is the way to solve can i have way to get the data?

Thanks

shreekar16-Oct-06 19:28

shreekar

16-Oct-06 19:28

Newbie_dydy85 wrote:
lbStockID.Items.Item(i)

returns a ListItem and you are assigning it to a string. Use lbStockID.Items.Item(i).Text OR lbStockID.Items.Item(i).Value (as the case maybe) for both drop downs and that should solve the problem.

Shreekar
http://shreekarishere.blogspot.com

Dave Kreskowiak17-Oct-06 2:13