|
That code works fine for me.
|
|
|
|
|
by keycode only u wanna to do this
Private Sub CBSelectName_KeyDown(ByVal sender As Object, ByVal e AsSystem.Windows.Forms.KeyEventArgs) Handles CBSelectName.KeyDownIf e.KeyCode = Keys.Enter And CBSelectName.Text <> "" ThenCBSelectName.Items.Add(CBSelectName.Text)CBSelectName.Text = NothingEnd IfEnd Sub
|
|
|
|
|
I have a form that is an MDI parent. I have a ToolStripContainer that has a dock style of fill inside the form. What i want, is for the MDI children of my form to be displayed in the Content Panel of the ToolStripContainer. What is happening now, is when i add a MDI child to my form, it is being displayed in the actual form itself, and not in the ToolStripContainer. Is there any way i can the Content panel of my form the panel where the MDI children are displayed?
if (your.Life == lifestyles.Programming)
{
your.Cool = true;
}
else
{
your.Cool = false;
}
|
|
|
|
|
Hi all,
i have developed many window base applications in vb6,vb.net with ms access and mssql express and all are running successfully. but i am facing problem to handle piracy of my applications.
pl suggest me a affective way to handle the problem like registration a key etc.
Thanks
rmshah
Developer
|
|
|
|
|
What you are Asking is Broad, and i cant help you with vb6, because i cant understand why you still developing vb6.
what you can do, you can create an administration Program for yourself to administer your applications. but now before your users use your aplication for the first, you need to check the Motherboard key and then your users should call or e-mail you to and give you their motherboard or Processer ID and in your administrator aplication you must generate the Activation key based on the key they gave you, then motherboards can never have the same serial number and you are free from Piracy.
hope this helps
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
hi Vuyiswa Maseko,
Thanks a lot for your suggestions.
further i would like to inform you that currently i am delveloping my applications in vb.net (3.0) not in vb6, the applications of vb6 i developed year ago.
your suggestions are very nice and i have developed an small application which retrieve the system informations like motherboard id, cpu id, hdd serial no, model and mac adress.
now pl suggest me, is this possible when someone insert CD (Demo Version of my application) in cd rom and all information mentions above auto matically write on the same cd which carries Demo version of my application or send the same via email auto maticaly.
Thanks agian
rmshah
Developer
|
|
|
|
|
Yes its possible, but it depend what type of info your e-mail to your self and Some info might violate te Privacy of the user. there are laws , as much as you want to Protect your Applcation and the Law is Protecting people from violation of Privacy.But still its possible and only if that person's machine has internet acccess 
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
thanks, pl suggest me code or link if possible
rmshah
Developer
|
|
|
|
|
I dont know if is possible...
Admit have a var filled with "www.mysite.com" is possible to looping in history of IE end delete this url site and all related link from history link?
If yes how to with VBA or VB.
Tks.
|
|
|
|
|
Please rephrase what you are trying to do....
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
Hi,
on WinXP IE6 (and probably IE7 too) keeps its history on disk, at
C:\Documents and Settings\username\Local Settings\History
on Vista IE7 seems to use C:\Users\username\AppData\Local\Microsoft\Windows\History
|
|
|
|
|
hi
im trying to find a way to upload some sql data from a sever runing back up exec this useing a mssql sever and database that a can access but how will i get the information from that database up to my hosted data base
|
|
|
|
|
jacko873 wrote: how will i get the information from that database up to my hosted data base
What have you done so far?
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
Run-on sentences are bad. Write clearly if you expect an answer.
|
|
|
|
|
Wow , Man in order for us to help you, you should first make sure that the other person will understand what you wrote. i realy dont understand that, please try again
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
I need help with a Point of Sale software for a pharmacy shop. I am currently using VB.NET and Oracle XE as my database. Ideas needed please.
Kofi
modified on Friday, July 18, 2008 1:47 PM
|
|
|
|
|
According to your profile am a beginner in programming, I suggest taking on a simpler project rather than trying to write a POS program for a pharmacy that you are using VB.NET/Oracle and have no idea where to start.
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
Paul, i have started the project already. I only said I am a beginner in programming because I am still in school and will graduate next week. I have designed my forms, I have a Gridview of stock where products are selected and added to a Listview as sales cart. Upon doing so, the subtotal Label should be updated with the product of the Cost and Quantity and Grand Total Labels should also be updated with the a final calculation plus tax. I have a problem here. I have only been able to add/remove item from the Sales Cart(ListView)
Kofi
|
|
|
|
|
kofigyimah wrote: will graduate next week
Congrats.
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
thanks.....now how can u help out bro.
Kofi
|
|
|
|
|
What is the code you are using to update? Can't really help much without knowing more about the schema or architecture you have in place.
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
Imports System.Data
Imports System.Data.OracleClient
Public Class POSfrm
Dim lst As ListViewItem
Dim getRow As Integer 'prodDataGridView.CurrentRow.Index
Dim subT As Double
Dim grandT As Double
Dim cnt As Integer = 1
Dim lastitem As Boolean = False
Private Sub Exitbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim strAns As String
strAns = CStr(MsgBox("Are you sure you want to exit this program?", MsgBoxStyle.YesNo + MsgBoxStyle.Question + MsgBoxStyle.DefaultButton2, "Please Confirm"))
If strAns = CStr(MsgBoxResult.Yes) Then
login.Show()
Me.Close()
End If
End Sub
Private Sub POSfrm_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
My.Settings.myForm = Me.Name
End Sub
Private Sub POSfrm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim rpmscmd As New OracleCommand
Dim rpmsds As New DataSet
Dim rpmsda As New OracleDataAdapter
rpmscmd.Connection = rpmscon
rpmscmd.CommandType = CommandType.Text
rpmscmd.CommandText = "select * from products"
rpmsda = New OracleDataAdapter(rpmscmd)
rpmsda.Fill(rpmsds, "products")
prodDataGridView.AutoGenerateColumns = False
prodDataGridView.DataSource = rpmsds
prodDataGridView.DataMember = "products"
End Sub
Private Sub prodDataGridView_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles prodDataGridView.CellContentClick
End Sub
Private Sub prodDataGridView_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles prodDataGridView.SelectionChanged
getRow = prodDataGridView.CurrentRow.Index
'Dim getindex As Integer = prodDataGridView.CurrentRow.Index
selItemlbl.Text = prodDataGridView.Rows(getRow).Cells.Item(0).Value
End Sub
Private Sub AddItemButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddItemButton.Click
'Dim getRow As Integer = prodDataGridView.CurrentRow.Index
Dim edate As Date = CDate(prodDataGridView.Rows(getRow).Cells.Item(4).Value)
subT = CDbl(prodDataGridView.Rows(getRow).Cells.Item(2).Value)
'Checks the timespan between the expiry date and NOW before it adds the one line of product to-be-sold to list and sales summary
If DetermineNumberofDays(prodDataGridView.Rows(getRow).Cells.Item(4).Value) > 0 Then
'numbers sales list
lst = salesListView.Items.Add(cnt)
'adds product to product column in sales list
lst.SubItems.Add(selItemlbl.Text)
'adds quantity to qty colum in sales list
lst.SubItems.Add(selQtytxb.Text)
'adds the product of selling_price and qty to the cost column in the sales list
lst.SubItems.Add((prodDataGridView.Rows(getRow).Cells.Item(2).Value) * (selQtytxb.Text))
'increases the subTotalLabel by the cost
subTotallbl.Text = CDbl(subTotallbl.Text) + subT
gTotallbl.Text = CDbl(gTotallbl.Text) + subT
If DetermineNumberofDays(prodDataGridView.Rows(getRow).Cells.Item(4).Value) < 30 Then
MsgBox(prodDataGridView.Rows(getRow).Cells.Item(0).Value & " expires on " & edate.ToShortDateString())
End If
cnt = cnt + 1
ElseIf DetermineNumberofDays(prodDataGridView.Rows(getRow).Cells.Item(4).Value) < 0 Then
MsgBox("BEWARE! " & prodDataGridView.Rows(getRow).Cells.Item(0).Value & " expired on " & edate.ToShortDateString() & ". You are not allow to sell it.")
End If
selQtytxb.Text = "1"
End Sub
Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
login.Show()
Me.Close()
End Sub
Private Sub RemoveItemBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RemoveItemBtn.Click
'If lst.ListView.SelectedItems(0).Index = lst.ListView.Items.Count - 1 Then
' MsgBox("its equal")
' lastitem = True
'End If
For Each lst As ListViewItem In salesListView.SelectedItems
lst.Remove()
cnt = cnt - 1
'subTotallbl.Text = CDbl(subTotallbl.Text) - salesListView.SelectedItems.ToString
Next
Try
'If lastitem = False Then
Dim i As Integer
If cnt > 1 Then
Dim numlist As New ListView
numlist = salesListView
For i = 0 To numlist.Items.Count - 1
numlist.Items(i).Text = i + 1
Next
End If
Catch ex As SystemException
MsgBox(ex.Message)
End Try
'Else
''to reset after last item is deleted
'lastitem = False
'End If
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
End Sub
Private Sub unPOS_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs)
End Sub
Private Sub unPOS_LinkClicked_1(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles unPOS.LinkClicked
userDetails.Show()
Me.Close()
End Sub
End Class
Kofi
|
|
|
|
|
Not the whole thing, just the suspect trouble spot in the code 
I would single step through everything in the debugger. Also, use the code block tag at the bottom to make it easier to read.
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
|
|
|
|
|
How to convert C# to visual basic....?
|
|
|
|
|
Are you talking about code or what ?
Parwej Ahamad
R & D: REST services with WCF
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
