|
Hi,
I m doing attenance automation project.I hv one form named Leave Details..tht form mainly contains four buttons namely
ADD
MODIFY
DELETE
SEARCH
But I want to use only one submit button for all the four...How can I do ths?Plz help me...
|
|
|
|
|
You are not clearly stating what you want. Try to be more specific. If you need a Button named as SUBMIT, so go for it. Define another button for submit and place the code inside of this button's click event. When you click it, it will be executed.
What a curious mind needs to discover knowledge is noting else than a pin-hole.
|
|
|
|
|
Thnks for ur advice....Actually I want to perform these three different operations(add,update,delete) with one submit button..Tht three operations are three functions..How can I call these functions within ths function..thnk now u got me...
LevDtlsAdd()-ADD
LevDtlsUpdate()-UPdate
LevDtlsDlte()-Delete
|
|
|
|
|
So how is your application going to know which operation is supposed to be performed??
Are you having the user type this stuff into a DataGridView? or some other data bound form?
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hello sir,
I have created a project in .net2005 and its running fine.Now when i take the same project and if i try to run in .net2003 its not running.Is there any version problem.Its shows that the vb.net project is not an valid project.
|
|
|
|
|
Obvious...
Vs2005 projects aren't compatible with previous versions of Visual Studio.Net...
Carmine,
Webmaster of: www.thetotalsite.it
My web blog: blog.thetotalsite.it
|
|
|
|
|
You can't go backwards like that. VS2005 projects wont load in VS2003. You can go the other way though, you can open a VS2003 project in 2005.
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Hi,
I've been trying to list all the registry values in a certain key, but I keep getting an "Object Reference Not Set to an Instance of an Object" error on the first line. My code is:
Dim GetValues As Microsoft.Win32.RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("\Software\Microsoft\Windows\CurrentVersion\Run")
For Each ValueKey As String In GetValues.GetValueNames
Dim ItemRead As String = My.Computer.Registry.GetValue(GetValues.ToString, ValueKey, "")
'Add Items to ListView
GlobalList.Items.Add(ItemRead)
Next
Is there maybe a better way to list the registry values than the way I've been trying? Nothing seems to work.
Thanks for the help.
Trinity: Neo... nobody has ever done this before.
Neo: That's why it's going to work.
|
|
|
|
|
Take the slash in front of "\Software\..." out. It should be "Software\...".
Your code is ASSUMING that OpenSubKey is actually returning something. It'll help if you checked GetValues (that's a bad variable name BTW) for an object before you try and use it in your loop. You might also want to get the values from the Run key you opened and not from the root of Local Machine. Also, you have to close the key you opened when you're done with it.
Dim runKey As RegistryKey = Registry.LocalMachine.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run")
If Not runKey Is Nothing Then
For Each valueName As String In runKey.GetValueNames()
Dim itemValue As String = runKey.GetValue(valueName, "").ToString()
Debug.WriteLine(String.Format("{0} : {1}", valueName, itemValue))
Next
runKey.Close()
End If
Dave Kreskowiak
Microsoft MVP - Visual Basic
|
|
|
|
|
Thanks for the help!
Trinity: Neo... nobody has ever done this before.
Neo: That's why it's going to work.
|
|
|
|
|
hi guys does anyone know how to list all the files that are in the bin folder that are xls format(.xls) to a listbox i am trying to learn how to do this so could any one teach =P
|
|
|
|
|
Try this:
For Each xslFile As String In My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.CurrentDirectory, FileIO.SearchOption.SearchTopLevelOnly, "*.xsl")
MsgBox(xslFile)
Next
Trinity: Neo... nobody has ever done this before.
Neo: That's why it's going to work.
|
|
|
|
|
Have your folder as a string.
Dim Folder as string = 'your project directory
Dim file as system.io.fileinfo
dim fol as new system.io.directoryinfo(folder)
for each file in fol.getfiles(".xsl")
listbox1.items.add(file)
next
Posted by The ANZAC
|
|
|
|
|
I posted this question on the ADO.NET board, but the only reply I got was that I need to check my Update code.
I have an Access database with a Date/Time column. I used the VS.NET forms designer to create an OleDbDataAdapter and DataSet from the datasource. The DataSet created has the Date/Time column with a DateTime type as expected. The Fill and Update methods work properly without exception. However, after an insert or update, the data that actually gets stored to the database has a time of 12:00:00 AM, requardless of the time I specified while running the application.
One solution I have thought of, but not tried, is to change all DateTime column types in the Typed-DataSet to OleDb.Date.
Thanks,
Scott Page
"Some people spend an entire lifetime wondering if they made a difference. The Marines don't have that problem."
( President Ronald Reagan)
|
|
|
|
|
I'm working on an ASP.NET 2.0 web application (VB) that needs to be internationalized. Extended ResourceProviderFactory and IResourceProvider and have an AccessResourceHelper to get the resources from the Access DB. Most of the resourceses works except for the 'Implicit' ones. I must be missing something.
If you need to see my code let me know..
Will post it.
Any help will be greatly appreciated,
HR
|
|
|
|
|
Below is the code I have but nothing appears on the form?
Public Class Form1
Dim WithEvents MyLabel As New Label
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
With MyLabel
.Left = 10
.Top = 10
.Width = 50
.Height = 25
.BorderStyle = BorderStyle.Fixed3D
.BackColor = Color.White
.ForeColor = Color.Blue
End With
End Sub
End Class
|
|
|
|
|
I don't see you putting any text on the label ?
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
Anybloodyid wrote: Below is the code I have but nothing appears on the form?
Just add me.controls.add(MyLabel) after end with statement. It will show up on the form.
What a curious mind needs to discover knowledge is noting else than a pin-hole.
|
|
|
|
|
Thanks June, it's always the obvious 
|
|
|
|
|
you have to add the label to your form controls collection
try this in form load
form1.controls.add(mylabel)
A.E.K
|
|
|
|
|
Wondered if anybody can help me with this. I want to have a databound combobox and the first item will be "Add New Item". The combobox will otherwise be populated from a table. If the user needs to enter a new item they can click on "Add New Item" and add a new record to the bound table and when the user returns to the combobox the new item will be selected (something similar to QuickBooks comboboxes). Any ideas or help much appreciated.
|
|
|
|
|
I would suggest not binding to the combobox using the DataSource property as a solution. I'll give you a rough example, though I haven't tested it, I know it is possible.
Assuming the following:
A ComboBox named 'cboItems'
A Button named 'btnUpdate'
A TextBox named 'tbItemName'
A Typed-DataSet named 'dsData' of type ExampleDataSet
A Typed-DataTable in 'dsData' named 'ExampleItems' of type ExampleDataTable
A DataColumn in 'ExampleItems' named 'ItemName'
<code>
Public Sub Form_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
'We will implement custom sorting, so disable the ComboBox automatic sorting
Me.cboItems.Sorted = False
Me.RefreshItems
End Sub
Private Sub RefreshItems
'Create a temp StringCollection to sort our data
Dim SortedItems As New Collections.StringCollection
For Each IRow as ExampleDataSet.ExampleRow In Me.dsData.ExampleItems
SortedItems.Add(IRow.ItemName)
Next
'Sort the list before adding it to the ComboBox
SortedItems.Sort
Me.cboItems.Clear
Me.cboItems.BeginUpdate 'Begin updating the combobox, recommended but not required all of the time
'Add the "Add New Item" first to ensure it is the first item
Me.cboItems.Items.Add("Add New Item")
For Each Name As String In SortedItems
Me.cboItems.Items.Add(Name)
Next
Me.cboItems.EndUpdate 'Finished updating the combobox
SortedItems = Nothing
'At this point, our ComboBox has at least one item "Add New Item" so we can safetly
'set the ComboBox.SelectedItem to 0
Me.cboItems.SelectedIndex = 0
'Alternative
'Me.cboItems.SelectedIndex = Me.cboItems.Items.IndexOf("Add New Item")
End Sub
Private Sub btnAdd_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnAdd.Click
Me.dsData.ExampleItems.AddExampleItemRow(Me.tbItemName.Text)
'After adding an item to the datasource, refresh the list to reflect the changes
'This can be done after deleting a row or updating it as well
Me.RefreshItems
End Sub
</code>
The previous example will work. However, I would suggest possibly using a button on the main form that opens a child form when clicked. The child form would have all of the controls needed to add the item. When the child form closed you could then add an item. This would allow you to bind directly to the combobox and not worry about all of the previous code.
Hope this helps,
If you have any other questions feel free to ask
Scott Page
"Some people spend an entire lifetime wondering if they made a difference. The Marines don't have that problem."
( President Ronald Reagan)
|
|
|
|
|
Thanks for all your help. I agree about that using a button may be a simpler option. I might actually use a context menu and let they user right click to bring up the form.
Thanks again
|
|
|
|
|
i have a clock alarm and want to send you
|
|
|
|
|
HoseinQuest wrote: ForumVisual Basic / VB.NET
Subject:Re: a Simple Clock Alarm
Sender:HoseinQuest
Date:15:43 6 Mar '07
i have a clock alarm and want to send you
If your aim is to submit your code, please use "Articles" and then select "submit an article". This is a forum.
What a curious mind needs to discover knowledge is noting else than a pin-hole.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
