Jx_Man 987 Nearly a Senior Poster Featured Poster

HI BUNUZI...Welcome to Daniweb friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi Anu...Welcome to Daniweb friend :)
Hope you can give many help to other members.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi meeleend...Welcome to Daniweb friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

using print dialog and like selvaganapathy said what u want to print...

Jx_Man 987 Nearly a Senior Poster Featured Poster

This following code will display a picture after progress bar is 100 %.

Dim i as Integer
	For i = ProgressBar1.Minimum To ProgressBar1.Maximum
		ProgressBar1.Value = x
	Label1.Text = x / 100 & "%"
	If i = ProgressBar1.Maximum Then
		PictureBox1.Image = Image.FromFile _
		("C:\Pic\Me.bmp")
	End If
	Next i
Naruse commented: This man alwasy helping +1
dnk commented: kasih daaah +1
Sawamura commented: Maturnuwun mas +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...
Like Sawamura said using clipboard
Try this following procedure, u can call in any event :

Private Sub Cut()
    If Me.Textbox1.Text.Length > 0 Then
        Clipboard.SetDataObject(Me.Textbox1.SelectedText)
        Me.Textbox1.Cut()
    End If
End Sub

Private Sub Copy()
    If Me.Textbox1.Text.Length > 0 Then
        Me.Textbox1.Copy()
    End If
End Sub

Private Sub Paste()
    If Clipboard.GetDataObject.GetDataPresent(DataFormats.Text) Then
        Me.Textbox1.Paste()
    End If
End Sub
Estella commented: Worked Perfectly +1
dnk commented: Good +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

Try this following code :

Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll
    Editor.SelectionIndent = Editor.Width * (TrackBar1.Value / TrackBar1.Maximum)
End Sub
Sawamura commented: works perfect :) +1
Neji commented: speedy +1
november_pooh commented: never know this +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

u can sort it in database itself. u can use order by in ur query i think.

yes, this an another solution.
use order by ColumName ASC (to sort ascending)
use order by ColumName DESC (to sort Descending)

Jx_Man 987 Nearly a Senior Poster Featured Poster

any error appear??

Jx_Man 987 Nearly a Senior Poster Featured Poster
Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi Mardy...WElcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

1. - this will disable other group box if you select listbox item :

private void listBox1_SelectedIndexChanged(object sender, System.EventArgs e)
{
	if (listBox1.SelectedIndex > -1) 
	{
		groupBox1.Enabled = false;
	}
}

- this will disable other group box if you select radio button :

private void radioButton1_CheckedChanged_1(object sender, System.EventArgs e)
{
	if (radioButton1.Checked == true) 
	{
		groupBox1.Enabled = false;
	}
}

2. this following code will clear all textbox in your form:

public void ClearControl(Control root)
{
	foreach (Control ctrl in root.Controls) 
	{
		ClearControl(ctrl);
		if (ctrl is TextBox) 
		{
			((TextBox)ctrl).Text = string.Empty;
		}
	}
}

you can call this function in the last of your codes in submit button.
ex:

private void Submit_Click(object sender, System.EventArgs e)
{
        ...... // Your codes
	ClearControl(this);
}
Jx_Man 987 Nearly a Senior Poster Featured Poster

so, what do you want?

Const PW = "nimda"
        Dim sInput As String

        sInput = InputBox("Enter Password to Open: ")

        If (sInput <> PW) Then
            Beep()
            MsgBox("Invalid password, cannot Open...")
        Else
            'code to delete record
        End If
ITKnight commented: Good +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

You're welcome...
Don't forget to mark this thread solved :)

Jx_Man 987 Nearly a Senior Poster Featured Poster
Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

yes, like veena said u need yo save the setting of radio button. i think txtfile is easiest way.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)
actually this forum has a introduction section. you can introduce your self there.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi Marc...Welcome to Daniweb friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Don't mind it Friend :)
Happy coding.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Any time friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Yes, i know it but your sintax is wrong, its should be C:\ not C:/
Also you don't have function to check if folder exist or not. see this following code :

Public Function FolderExist(Path As String) As Boolean

If LenB(Path) = 0 Then FolderExist = False: Exit Function

If LenB(Dir$(Path, vbDirectory)) > 0 Then
If (GetAttr(Path) And vbDirectory) = vbDirectory Then FolderExist = True
Else
FolderExist = False
End If
End Function

Private Sub Command1_Click()
Dim d, Path As String

d = Format(Now(), "dddd, yyyy mmmm dd")
MsgBox (d)

Path = "C:\Photos " & d
If FolderExist(Path) = True Then
    MsgBox "Folder is available"
Else
    rspCreate = MsgBox("Directory doesn't exist, do you wish to create it?", vbYesNo)
    If rspCreate = vbYes Then
        MkDir Path
    End If
End If
End Sub
dnk commented: Nice +1
november_pooh commented: Great +1
Naruse commented: Nice one friend :) +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

its not about date but your pathName is wrong.
should be : C:\

Jx_Man 987 Nearly a Senior Poster Featured Poster

:)

Jx_Man 987 Nearly a Senior Poster Featured Poster

try this following code (needed timer and statusbar with 2 panels), text to scrolling is from StatusBar panel 2 text :

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
  Dim text As String
  text = StatusBar1.Panels.Item(0).Text
  StatusBar1.Panels.Item(0).Text = text.Substring(1) & text.Substring(0, 1)
End Sub

i post the screenshot too.

Neji commented: great +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

there is the file

Jx_Man 987 Nearly a Senior Poster Featured Poster

there are better to not allowed user to input alphabetic character. So, when user press keyboard keys, u can handled it by code to not allowed them to input alphabetical character.
this following code will not allowed you to input except number :

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If (Microsoft.VisualBasic.Asc(e.KeyChar) < 48) _
              Or (Microsoft.VisualBasic.Asc(e.KeyChar) > 57) Then
            e.Handled = True
        End If
        If (Microsoft.VisualBasic.Asc(e.KeyChar) = 8) Then
            e.Handled = False
        End If
    End Sub
Jx_Man 987 Nearly a Senior Poster Featured Poster

you're welcome my friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

hmmm...
see this thread
Fell free to post your question, we will try to answer as we know.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Your uploaded file is not vb.net project but vb6 project. i was converted this project into exe file using vb6.

Neji commented: so your job now is converter project to exe? :D +1
Jx_Man 987 Nearly a Senior Poster Featured Poster

means its scroll in status bar or in other place?

Jx_Man 987 Nearly a Senior Poster Featured Poster

This section just for introduction friend :)
You can post your question about Encryption programs and anything else in current section, depend on your programming language.

Ok. See ya...

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

I've encountered error on the page thats why it post double thread... thx for the reply sir... i just downloaded that vb file on

http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=70511&txtForceRefresh=52620082120625245

i dont have vb.net so i just want to know how to run this in .exe or rather how to convert it in .exe using a converter or something... thanks jx_man

You don't needed converter to make your project in exe file cause vb already have it. Like i said in previous post, on your vb project, go to File -> Make ProjectName.exe.. after make exe file you can found it in your vb project folder.
If it was solved please mark this thread as Solved.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Set Image Properties with your gif file Not BackgroundImage properties

Jx_Man 987 Nearly a Senior Poster Featured Poster

so what if the database still running?
use timer to always get new backup db.

Jx_Man 987 Nearly a Senior Poster Featured Poster

Don't post double threads. I already answered your question in your other thread.

Jx_Man 987 Nearly a Senior Poster Featured Poster

looks like this project created in vb6, right?
If in vb 6 :
go to File-> Make ProjectName.exe
It will appear in project folder.
If in vb.net, exe file already created by compiler when u first debug project.
To get .exe FileGo to Project Folder/Bin/, you can found exe file there.

Jx_Man 987 Nearly a Senior Poster Featured Poster
cmd = New OleDbCommand("SELECT * FROM orders where YearBorn LIKE '%" & Trim(TextBox2.Text) & "%'")
Jx_Man 987 Nearly a Senior Poster Featured Poster

Or u can set data types as AutoNumber

Jx_Man 987 Nearly a Senior Poster Featured Poster

select the last OrderId value then + 1.
ex : 1,2,3
Select last value = 3, then 3 + 1 = 4...

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi Jennifer...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

i don't understand....what is line?

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)

Jx_Man 987 Nearly a Senior Poster Featured Poster

Hi...Welcome to Daniweb Friend :)