|
Hi,
try using this
if ubound(array)>=1 then<br />
'array has elements<br />
else<br />
'array is empty<br />
endif
hope this Works...
Nitin...
|
|
|
|
|
I have selected a file from a listbox that I need to read. The selected file is fileinfo, but all the articles I have read are looking for a string for the file w/path.
silver-gray
|
|
|
|
|
hi,
I want to populate the list from db into my treeview and add textbox to another column corresponding to the each lowest child node of the treeview. i am new to vstudio 2005.but experienced in 2003. i tried all datagridview,treeview and listview controls. but can't find out the solution.
eg.
Parent 1
Child0 of Parent 1
child1 of Child0 Textbox1
child2 of Child0 Textbox2
Child00 of Parent 1
child1 of Child00
child2 of Child01 Textbox3
Parent2
.....
what control can i use to achieve this structure?
this is urgent. any help would be greately appreciated.
also i couldnt find any useful articles which to describe databinding in treeview and listview controls. any useful reference?
Thank you all.
|
|
|
|
|
No control exists that will provide this functionality. You'll have to build one yourself. Search the articles for "TreeListView" and you'll find an example of creating your own TreeView control with similar functionality.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hello,
I have created a program that monitors different task being done. I have used the StopWatch class, to start and stop different task and get the duration of time it takes to do them. My problem is I want to be able to display them in a datagrid in another form all different tasks with the running times displayed for each task that is currently being done.
The way my program works is that they will select in the datagrid on the main form the task that they want to start, they could do this for many tasks and have many running at the same time. The customer does not want this information displayed on the main form, but displayed in another form. So even though the task are started on the main form, the display form should somehow be able to view the currently running times. These should be displayed in datagrid as there could be many tasks that will be added and deleted from it.
Is it possible to have global variables across both forms, or is there another way to do this.
Many thanks in advance,
Steve
|
|
|
|
|
You should set up delegates between the two forms to pass this sort of info back and forth. There are no globals in .NET, but you can create a class with public static variables and use those, if you must.
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
|
|
|
|
|
Steve,
There is such a thing that I have used in the past. Below is the code for a VB.NET gui application that has two forms, Form1 and Form2. I hope this helps.
In the code behind for Form1, it starts...
Public Class Form1
Inherits System.Windows.Forms.Form
...
Public Shared GameSelected$ 'name of game selected by user or you could declare it Public Shared String GameSelected
...
GameSelected = "lottery"
...
'in my example, when user clicked on a button, the second form appeared
Private Sub GoToSecondForm_Click(ByVal sender As System.Object, ByVal e As System.EventARgs) Handles GoToSecondForm.Click
Dim secondForm as New Form2
secondForm.ShowDialog()
End Sub
...
End Class
'rest of code below is in Form2
Public Class Form2
Inherits System.Windows.Forms.Form
....
DisplayGamesLabel.Text = "Game Selected =" & Form1.GameSelected
End Class
|
|
|
|
|
hi everyone
i m trying to make a stream ripper for shoutcast server.
i m sending a httpwebrequest to the server but i m when trying to get the respone from the server i get protocol violation error
here is the code for sending the web request:
dim ServerPath as string="/"
Dim Prx As New WebProxy("172.31.101.101", 8080)
Prx.BypassProxyOnLocal = True
Prx.Credentials = New NetworkCredential("xyz", "xyz")
if Not Server Is Nothing Then
Request = CType(WebRequest.Create(Server), HttpWebRequest)
Request.Headers.Clear()
Request.Proxy = Prx
Else
MessageBox.Show("Please enter the name of the server you want to connect to", "Server Address Required", MessageBoxButtons.OK, MessageBoxIcon.Error)
Return
End If
Request.Timeout = 500000
Request.Headers.Add("GET", ServerPath & "HTTP/1.1")
Request.Headers.Add("icy-metadata:1")
' Request.UserAgent = "WinampMPEG/5.09"
Try
Response = Request.GetResponse()
Catch ex As Exception
MessageBox.Show(ex.Message, "Error in Connection",MessageBoxButtons.OK, MessageBoxIcon.Error)
Return
End Try
|
|
|
|
|
Hello
I have a web application that should send a mail with a text from a textbox  to the adress that is in another text box.
Can anyone tell me how 2 do this or send me a link to a tutorial... ? plz
10x
|
|
|
|
|
I suspect that this[^] is the reason someone voted you down.
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
|
|
|
|
|
Hi all,
I am doing an desktop application in vb.net. For forms i have used the
property formborderstyle=none. So what happens when i minimize the form into
the task bar,and again right click on the form i could not the maximize or
minimize or restore. So please let me know how to do this.
regards
ravindra
|
|
|
|
|
Hi
If you are using the borderstype = none means VB disable the maximised and minimised property so you have to make it enable
Tushar kothari
|
|
|
|
|
Hi Friends,
I need the code to open cash drawer either it will be connected in COM or Serial Port.
Below this code is working VB 6.0.
Open "LPT1" For Output As #1
Print #1, Chr$(27); Chr$(112); Chr$(0)
Close #1
I need the code in VB.NET. Any can change the code to .NET.
Thank's in advance,
Senthil V.
|
|
|
|
|
I believe there is a serial port class in .NET 2.0. But it's new there, so are you using 2.0 or not ?
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
|
|
|
|
|
No we are using .NET 1.0.
|
|
|
|
|
Which port is this drawer connected to? In your original post, you said you wanted the serial port, but yet the code you poasted says its on the Parallel port. There will be a HUGE difference in the two procedures used to send raw data to the drawer based on which port it's connected to.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
how to pass parameter from my windows form to cyrstal report that depend on sql stored procedure
i am using vb.net framework-1.1
|
|
|
|
|
Hi. How can I convert bitmap to JPEG in VB 6.0? Is there any component available?
Thanks in advance
|
|
|
|
|
It's about 5 lines of C++ on a system with GDI+ available, perhaps you could make one ?
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
|
|
|
|
|
Can any one tell me the consequences when this devenv.exe gets corrupted due to which type of controls.
Rekha
|
|
|
|
|
What? Would the program itself get corrupted just because you use a specific control in the designer? Do you have any source to something that points in that direction?
---
b { font-weight: normal; }
|
|
|
|
|
Hi, this is how i open a report inside VB6
Sub CreateReport(SQL As String, MyConnection As Connection, ReportPath As String, _
ReportTitle As String, OpenMethod As Integer)
Dim crApp As New CRAXDRT.Application
Dim crRep As New CRAXDRT.Report
Dim Rs As New ADODB.Recordset
On Error GoTo Err_Proc
With Rs
.CursorLocation = adUseClient
.Open SQL, MyConnection, adOpenKeyset, adLockReadOnly
.ActiveConnection = Nothing
If .RecordCount > 0 Then
Set crRep = crApp.OpenReport(ReportPath, OpenMethod)
crRep.Database.SetDataSource Rs
' crRep.Database.LogOnServer "C:\SUKI\Support\crystal\Pdlsql.dll", gStrServer, gStrDatabase
crRep.ReportTitle = ReportTitle
With frmReportViewer
.Caption = crRep.ReportTitle
.WindowState = vbMaximized
.CRViewer.ReportSource = crRep
If OpenMethod = 0 Then 'print directly to printer
crRep.PrintOut False, 1, True
Else
.CRViewer.ViewReport '1=show print layout to user
.Show vbModal
End If
End With
Else
MsgBox "Record(s) not found.", vbExclamation, App.Title
End If
.Close
End With
Set Rs = Nothing
Set crRep = Nothing
Set crApp = Nothing
Exit Sub
Err_Proc:
Call ErrMsg
End Sub
Am i forgetting something cause my report is not working. "physical database not found" is always its error.
geboy
|
|
|
|
|
Hi
If you remove the line .ActiveConnection = Nothing then you problem may get solved
Tushar kothari
|
|
|
|
|
Hi, im having problem with crystal reports 8.5
I've installed a CRM program. the installation is successful but when i tried to run the report an error "physical database not found" occured." I have included all the possible dll's that is needed in the package but still its not working.
what should I do? please help.
geboy
|
|
|
|
|
why dont you use crystal instead. heres the function. hope this would help
Sub CreateReport(SQL As String, MyConnection As Connection, ReportPath As String, _
ReportTitle As String, OpenMethod As Integer)
Dim crApp As New CRAXDRT.Application
Dim crRep As New CRAXDRT.Report
Dim Rs As New ADODB.Recordset
On Error GoTo Err_Proc
With Rs
.CursorLocation = adUseClient
.Open SQL, MyConnection, adOpenKeyset, adLockReadOnly
.ActiveConnection = Nothing
If .RecordCount > 0 Then
Set crRep = crApp.OpenReport(ReportPath, OpenMethod)
crRep.Database.SetDataSource Rs
' crRep.Database.LogOnServer "C:\SUKI\Support\crystal\Pdlsql.dll", gStrServer, gStrDatabase
crRep.ReportTitle = ReportTitle
With frmReportViewer
.Caption = crRep.ReportTitle
.WindowState = vbMaximized
.CRViewer.ReportSource = crRep
If OpenMethod = 0 Then 'print directly to printer
crRep.PrintOut False, 1, True
Else
.CRViewer.ViewReport '1=show print layout to user
.Show vbModal
End If
End With
Else
MsgBox "Record(s) not found.", vbExclamation, App.Title
End If
.Close
End With
Set Rs = Nothing
Set crRep = Nothing
Set crApp = Nothing
Exit Sub
Err_Proc:
Call ErrMsg
End Sub
geboy
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
