Visual Basic

6-Jul-05 8:41

Is there a way to get the selectedvalue (or selectedtext or selecteditem) from a databound combobox into a string variable? I keep getting cast from datarowview to type string not valid.

Anonymous6-Jul-05 8:44

6-Jul-05 8:44

Give one of these a try:

ComboBox.SelectedValue.ToString

OR

ComboBox.SelectedItem.ToString

oakleaf6-Jul-05 8:48

6-Jul-05 8:48

I had already tried that.
still cast from datarowview to type string not valid

Anonymous6-Jul-05 8:55

6-Jul-05 8:55

Do you have code sample?

Anonymous6-Jul-05 8:58

6-Jul-05 8:58

Also, have you tried:

ComboBox.Text

oakleaf6-Jul-05 9:05

6-Jul-05 9:05

The error is in result of a query

'field_names is a string
'field_number is the underlying value

commandtext = "Select field_number,field_names From field_info where field_number = " & cbfieldEdit6.SelectedValue.ToString

cbfieldedit6.text works, but I need the underlying value

I think I will have to do it in a round about way...

commandtext = "Select field_number,field_names From field_info where field_names = " & cbfieldEdit6.text

and then use a datareader to get the value I need.

field1 = dr.getvalue(0)

oops... modified query

commandtext = "Select field_number,field_names From field_info where field_names = '" & cbfieldEdit6.text & "'"

Anonymous6-Jul-05 9:31

6-Jul-05 9:31

This person ran into a similar problem when casting to an Integer. Perhaps this is your problem?

http://dotnetforums.net/showthread.php?t=89891

oakleaf6-Jul-05 10:05

Strange Behavior in WinForm

6-Jul-05 10:05

I ended up querying the database for the underlying value using the combobox.text for the Where clause (Thankfully it doesn't cause much overhead)

I looked all over, and I am beginning to think that what I was trying to do is impossible by .net design. It is expected that you will be updating the datasource using the (updated) dataset.

.text is the only data that I could get out of a databound combobox.

Mtognetti6-Jul-05 8:27

Mtognetti

6-Jul-05 8:27

Good Day,

I have decided that it is necessary to resize a form (new base size) as well as all of the controls it contains. But although I resize the form and its elements, when I run the program in debug mode (even after building & rebuilding both the project and solution) the changes do not take effect at run-time...only at design time.

Any help is greatly appreciated.

mtognetti

communicating with c++ using sockets

boy2126-Jul-05 7:57

boy212

6-Jul-05 7:57

is it possible to make a program develpoed in vb.net and another one in c++ and make them communicate with each other using socket programming.if possible,how? Thanks

Re: communicating with c++ using sockets

Dave Kreskowiak6-Jul-05 8:16

Dave Kreskowiak

6-Jul-05 8:16

Of course you can! Over sockets, neither side gives a **** what language the other is written in.
One side needs to be written as a server and the other as a client. Kind of like an FTP server and FTP client.

But, something is telling me that your requirements won't be satified with this method. So, dare I ask... What are you REALLY trying to accomplish using this communication method?

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Filelistbox

JimClark686-Jul-05 7:41

6-Jul-05 7:41

I can list my drives, my folders, my files, I can see everything that my computer has, using vb.net, now, How can I move the selected file (any file) on the filelistbox to a fixed destination?.
Can I select a file from the filelistbox and then click the move(btn_click1) button to move the record to the specific location?. How can I do that? Is it possible?
I'm trying to create a copying and moving program with fixed source and destination, specific for the company I work for. I can list my files, folders everything but i do not know how to move items from a listbox to a specific folder.

Anonymous6-Jul-05 9:15

6-Jul-05 9:15

I'm not sure what your FileListBox contains, but I will assume it contains the specified path of the file? If so, you can try the following:

Private Sub btnMove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMove.Click, btnCopy.Click<br />
   <br />
Dim btnClicked as Button<br />
'assuming selected item is String <br />
'for the full path of an existing file<br />
Dim f as New FileInfo(FileListBox.SelectedItem.ToString)<br />
<br />
btnClicked = CType(sender, Button)<br />
<br />
'Move or Copy according to clicked button<br />
Select Case btnClick.Name<br />
   Case "btnMove"<br />
'Move to destination directory - f.Name indicates the original file name<br />
     f.MoveTo("destDir\" + f.Name)<br />
'OR<br />
'File.Move(sourceFileName, destFileName)<br />
   Case "btnCopy"<br />
     f.CopyTo("destDir\" + f.Name)<br />
'OR<br />
'File.Copy(sourceFileName, destFileName)<br />
End Select<br />
End Sub

JimClark686-Jul-05 9:36

6-Jul-05 9:36

Thanks for your help, but i'm getting an error:

< Cannot find the file specified > (but the file has been selected from the filelistbox) so i don't know. this is what I have so far:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'local scope
Dim myDirectories() As System.IO.DirectoryInfo
Dim i As Integer

'create a new directory object pointed at c:
Dim myDirectory As New System.IO.DirectoryInfo(Path:=mypath)
'return the sub directories of c: from the global directory object
myDirectories = myDirectory.GetDirectories()

'loop through the directories and add them to the list box
For i = 0 To UBound(myDirectories) - 1

'add the directory name to the list
ListBoxdirectories().Items.Add(myDirectories(i).Name)

Next

'select the first directory in the list
' note: this will trigger the events that fill the label control
' and the files list box and its label control
ListBoxdirectories().SelectedIndex = 0
End Sub

Private Sub ListBoxdirectories_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBoxdirectories.SelectedIndexChanged

'purpose: synchronize the files list box with the selected directory
' and display the selected directory's information

'local scope
Dim myDirectory As System.IO.DirectoryInfo
Dim dirInfo As String
Dim myFiles() As System.IO.FileInfo
Dim i As Integer
myDirectory = New System.IO.DirectoryInfo(Path:=(mypath & mydirname))
'clear the listbox of its current contents
ListBoxFiles().Items.Clear()

'get a directory info object based on the user's selection
mydirname = ListBoxdirectories().SelectedItem.ToString & "\"
myDirectory = New System.IO.DirectoryInfo(Path:=(mypath & mydirname))

'set the dir info
dirInfo = dirInfo & "Path: " & myDirectory.FullName & vbCrLf
dirInfo = dirInfo & "Attributes: " & myDirectory.Attributes.ToString _
& vbCrLf
Labeldirectoryinfo().Text = dirInfo

'get the files in the directory
myFiles = myDirectory.GetFiles()

'check for files
If UBound(myFiles) >= 0 Then

'loop through the files array and add to the listbox
For i = 0 To UBound(myFiles) - 1
ListBoxFiles().Items.Add(myFiles(i).Name)
Next

'select the file in the list, this will trigger the event to change
' the file info label control listBoxFiles().SelectedIndex = 0

End If

End Sub

Private Sub ListBoxFiles_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBoxFiles.SelectedIndexChanged
'purpose: change the contents of the file properties label

'local scope
Dim myFile As System.IO.FileInfo
Dim fileInfo As String

'set the file name
myfilename = ListBoxFiles().SelectedItem.ToString

'create a new file object

myFile = New System.IO.FileInfo(fileName:=mypath & mydirname & _
myfilename)

'set the file info to display
fileInfo = fileInfo & "Directory: " & myFile.DirectoryName & vbCrLf
fileInfo = fileInfo & "Created Time: " & myFile.CreationTime & vbCrLf
fileInfo = fileInfo & "Size: " & myFile.Length & vbCrLf
fileInfo = fileInfo & "Last Accessed: " & myFile.LastAccessTime & _
vbCrLf
fileInfo = fileInfo & "Attributes: " & myFile.Attributes.ToString & _
vbCrLf

'set the label to the file's info
Labelfileinfo().Text = fileInfo

End Sub
Private Sub btnclose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnclose.Click
'purpose: end the application
'close the form
Me.Close()
End Sub

Private Sub btnMove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMove.Click
Dim btnClicked As Button
'assuming selected item is String
'for the full path of an existing file
Dim f As New FileInfo(ListBoxFiles.SelectedItem.ToString)

btnClicked = CType(sender, Button)

'Move or Copy according to clicked button
Select Case btnClicked.Name
Case "btnMove"
'Move to destination directory - f.Name indicates the original file name
f.MoveTo("destDir\" + f.Name)
'OR
'File.Move(sourceFileName, destFileName)
Case "btnCopy"
f.CopyTo("destDir\" + f.Name)
'OR
'File.Copy(sourceFileName, destFileName)
End Select

End Sub

Anonymous6-Jul-05 9:48

6-Jul-05 9:48

If you are using the code I posted word for word, it will not work.
You must specify the destination filename according to where you want the file to be placed. If you use my code the application will not know what "destDir\" + f.Name is, so change the lines in bold:

JimClark68 wrote:
Select Case btnClicked.Name
Case "btnMove"
'Move to destination directory - f.Name indicates the original file name
f.MoveTo("destDir\" + f.Name)
'OR
'File.Move(sourceFileName, destFileName)
Case "btnCopy"
f.CopyTo("destDir\" + f.Name)
'OR
'File.Copy(sourceFileName, destFileName)
End Select

You can also throw in an Error check by checking if the File exists first:

File.Exists(filename)

Anonymous6-Jul-05 9:52

6-Jul-05 9:52

I also forgot to mention, since you are adding FileInfo objects to your FileListBox, you can cast them from the selectedItem property.

'local fileinfo in button click event
Dim f as FileInfo

f = (ListBoxFiles.SelectedItem, FileInfo)

'now you can use the MoveTo or CopyTo methods respectively

'need to move
f.MoveTo("your destination filename here")
'OR need to copy
f.CopyTo("your destination filename here")

Anonymous6-Jul-05 9:54

6-Jul-05 9:54

Oops!

Anonymous wrote:
f = (ListBoxFiles.SelectedItem, FileInfo)

should be:

f = Ctype(ListBoxFiles.SelectedItem, FileInfo)

JimClark687-Jul-05 4:08

7-Jul-05 4:08

So the file name has to be specified?. if that is the case, i'm in trouble.
if i can get the file path from the dirlistbox, why when i select a record from the filelistbox, i'm able to get the path, on my label, but when i try to copy the file i get this error:

< cannot find file >

JimClark687-Jul-05 4:03

7-Jul-05 4:03

Well my problem is that i do not want to specify a file, I want it to be random.
in other words the only specific(hardcode)is source and destination, but the file name would be the file selected in the filelistbox.
I cannot set this program with hardcoded paths, it has to be universal path.

Anonymous7-Jul-05 4:43

7-Jul-05 4:43

I think you might have misunderstood when I say you specify the file name.

The way it works is you must specify the fully qualified path including file namefor the destination file. Say you want to move a file C:\myfile.txt -> D:\MyDocuments\myfile.txt. The file name may be the same as what you have selected from your FileListBox, BUT you must specify it in code, or else the method will not know where to put it.

Now, when you select myfile.txt from your FileListBox (its a FileInfo object according to your code)

When clicking on the Move Button:

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click<br />
 <br />
Dim f as FileInfo <br />
Dim destDir as String = "D:\MyDocuments\"<br />
<br />
'cast object<br />
f = CType(FileListBox.SelectedItem, FileInfo)<br />
<br />
'move syntax = FileInfo.MoveTo(destFileName As String)<br />
'attempt move<br />
<br />
'using the FileInfo Name property will return the file name<br />
'in the case where f.Name = myfile.txt<br />
'this way, you do not care what the file name is!<br />
<br />
 f.MoveTo(destDir & f.Name)<br />
<br />
'this should move the selected file to the <br />
'fully qualified path D:\MyDocuments\myfile.txt<br />
End Sub

I hope this code clarifies things for you?

JimClark687-Jul-05 7:35

7-Jul-05 7:35

Thanks, I do not know how to thank you! It's working.

I just hope that you have a good job making good $$$$$$$$$$$$$$$$!

JimClark687-Jul-05 9:48

7-Jul-05 9:48

It worked for a while, now i'm getting this error:

System.InvalidCastException
Specified cast is not valid.

I have no clue.

thanks for your help, though, it didn't work, you try to help, I'll appreciate that.

Anonymous7-Jul-05 10:09