Get Files Involving Multiple Extensions?
Sep 3, 2010I currently have the following working[code]...
What I would like to do is expand the filter to include alternative file extensions (i.e., ".rar", ".7z", etc)
I currently have the following working[code]...
What I would like to do is expand the filter to include alternative file extensions (i.e., ".rar", ".7z", etc)
I have certain files that need deleted every time I run my program. There are some files that start with f. and then end with .00000668 or .00005396 and so on. Here is my coding that is not working to delete the f files.
View 1 RepliesI'm working on trying to split a large file from say 3gb to multiple 500mb files with a .1, .2, .3 etc... extension. My output is one 500mb file and one 28kb file. What I'm missing to continue reading the filestream into the 2nd split file.
Sub SplitFiles(ByVal inFile As String, ByVal newFileSizeBytes As Integer)
Dim i As Short = 1
Dim fsInput As New System.IO.FileStream(inFile, FileMode.Open, FileAccess.Read)
Dim fsOutput As System.IO.FileStream
Dim bytBuffer(4096) As Byte 'holds a block of bytes for processing
[Code] .....
I am making a program that takes files (inside their folders) and copies them into a selected file path. For example, I plug in my jump drive, run my program and it copies my files on the jump drive over to my PC. Now my program does this but it takes the files inside each folder in my jump drive instead of creating a folder for each one in my jump drive. The result is a mess of files in the selected pathway in my PC.I went and created variables in My.settings so that you can save the file path even after you close the program. I just want the program to copy the folders(with the files in each folder) in my jump drive and move them over to my PC.I am using this program copy the files from my jump drive over to my PC, because I save a lot of work on my jump drive and I need to back it up often. [code]
View 4 RepliesI have a datatable as shown in the figure. Let me explain my required based on this image. I have 7 rows of data. The rows 1 and 2 contains columns till UnitSqcNo same. I want only row 3 among the two. In general I want select all the rows with distinct model, unittype, unit and rest with greater CompId. ie the table should look like
View 1 Repliesi am using the getfiles function to have all the files in a specific path but i want to use the getfiles to find .rar and .mp3 getfiles("c:program files",)
View 2 RepliesIs there a way in VB to copy certain file types comparable to the commnad line copy command
View 4 RepliesI'm using the following code.
Dim dir As New IO.DirectoryInfo(FolderBrowserDialog.SelectedPath)
Dim files As IO.FileInfo()
Dim filename As IO.FileInfo
If (rbNoSubfolders.Checked) Then
[Code]...
I'm getting an "Illegal characters in path" error. How can I fix this?
How can I write this
Path = "C:"
For Each FoundFile In My.Computer.FileSystem.GetFiles(Path, FileIO.SearchOption.SearchTopLevelOnly, "FILE*.10") _
And For Each FoundFile In My.Computer.FileSystem.GetFiles(Path, FileIO.SearchOption.SearchTopLevelOnly, "FILE*.09")
'do code
Next My goal is simply to search for multiple file extensions. I cant use FILE* as my search parameter as this returns other files e.g FILE2012.10z which i don't want.
How can I filter on multiple file extensions when using IO.DirectoryInfo.GetFiles?
View 3 Repliesthe problem is I'm trying to access a file that has no file extension. I think you can see why this is so difficult. The specific file I'm trying to edit is the hosts file (C:\Windows\System32\drivers\etc\hosts).
View 2 RepliesHow would I loop through a directory recursively, and get a list of ALL file extensions used, not duplicating any of them? It could just output to the debug window. Or perhaps write to the database and have the database filter the duplicates. So it would be great to see...
[Code]...
I'm trying to delete all the files in the same folder that have the same name but different extensions, such as CurrentWallpaper.bmp, CurrentWallpaper.jpg, CurrentWallpaper.png, without putting them in a separate folder. How could I go about doing this? I tried doing
Dim bg As String = dir + "" + Login.UsernameTextBox.Text
Kill(bg + "CurrentWallpaper.*")
but it didn't work. PS: I would also like to use the same technique for loading the image as a background image instead of having to do this:
Try
If My.Computer.FileSystem.FileExists(Login.UsernameTextBox.Text + "/CurrentWallpaper.jpg") Then
Me.BackgroundImage = Image.FromFile(Login.UsernameTextBox.Text + "/CurrentWallpaper.jpg")
End If
[code]....
I want to design an application that can open file of certain extensions. For ex. There is a software called ARJ32 which can open file with extensions
.a00 ,.a01...................,.a19.
Also there is application called apk emulator which can open .apk files. So eve I want to design an application that an open certain file extensions. Is it possible? How do I start? I am well versed with c, c++, Java, VB.NET
I'm writing a program that allows users to view certain files using a DataGridView as the selection method I can do most of that just fine. Here's the part I'm having trouble with: I want to open the files using whatever program they have associated with the file extension. After researching it (on these forums), I determined that I should use the Process.Start() method. However, Windows throws an Win32Exception if there is no association to the filetype, and I want it to show the "Open With" dialog instead, and I can't figure out or find how to do that.
View 4 Repliesim used to C programming.
Private Sub SaveAsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveAsToolStripMenuItem.Click
timedate.Stop()[code]......
The problem is that if I save a file I get "myfile.GDL" if I overwrite that I get a new file "myfile.GDL.GDL" ect.the other problem being that the filtering in the windows save/open dialog wont show .GDL files unless I select "all files".
I have a website that has highly granulised access and hence requires many web.config files. The problem is I would like to trim the menu so that only certain users will have access to certain folders. I have enabled trimming and setup roles in the sitemap, however when I access the page the menu is not show, as I am authorized to view the default page which is not in a subfolder. When I type the url of a page in sub folder's I have access.
How should I handle this:
A site map for each web.config file - don't know how this will work Removing the sub web.config file to only use a single one
I know this is out there and probably illogical but I was wondering if it was possible to take multiple picture files and compact them into one file.... and then retrieve them from the program later? Way to combine any amount of image files into one file
Module Module1
Sub combine()
Dim img1 As New Bitmap("i1.jpg")
[CODE]...
I have this code and I know that this part "WHERE dbo.tblenrol.SectionName=dbo.tblSection.SectionName)" of the code not right... I want to update the my tblenrol.Adviser from tblTeacherFile.Adviser if the tblenrol.SectionName is equal to tblSection.SectionName...How do I do it??
Using cmdUpdate As New SqlCommand("UPDATE tblEnrol " & _
"SET tblEnrol.Adviser = (SELECT dbo.tblTeacherFile.Adviser " & _
"FROM dbo.tblTeacherFile " & _[code]......
The bigger problem is that I can't seem to get everything involving using stream writer and reader working. If I start of with a .txt file already correctly formatted then I can display it in the list box. But adding data during run time is not proving successful.
[Code]....
i'm new to this site and i'm hoping there's someone out there that can help me with this problem. I'm doing a course in visual basic 2010 and having real trouble understanding some aspects of it. Here goes -
I need to do a validation check on a users inputed string. The users input is called Test_data and it needs to be exactly 10 characters long and must only use the letters " a " to " f "
I know to check that the string is exactly 10 characters long by the Len function, and i have that working.BUT - how do i check whether the users inputed string uses the letters a to f ? I thought it would involve something to do with ASCII, but i would have no idea how to form a validation check using ASCII.
I would like to read each line of text from the file outputted from this block.Each line is then used with the service controller to output a list of services running on that computer.
Dim de As New DirectoryEntry()
'Name place to write file to
Dim strFile As String = "C:DomainUsers.txt"
[code]....
I'm developing an application to help law enforcement retrieve and analyze logs and other files left by the use of Pidgin (a multi-protocol messenger client). Right now I'm nearly done, but I want to add the ability to search chat logs for user-defined words or phrases and I don't even know where to begin.
Chat logs are stored as html documents in a folder/sub-folder/sub-folder/sub-folder fashion, where each sub-folder can have dozens of sub-folders inside of it, and the final sub-folder can have dozens if not hundreds of chat logs. If anybody could point me in the right direction, I'd be very grateful.
(Also, this is the first program I've written since about 2005, and I'm essentially teaching myself VB as I go. If you'd like to see what I've cobbled together so far, you can find the program here.)
My application need to communicate with my self made device through serial port. I have to change the selected index of Tabs when I press a button on my device. I have Form1, Form2, Module1 Form1 Contains the Serial Port Control. Form2 contains the Tab which needs to be changed. When I press a button on device them, the button pressed is stored in an integer form in a global variable.The Interrupt for the Serial Port directs the control to the module1 where I decide using Select Case that what index of which TabControl I have to select.Depending on that, I change the Index of the required Tab.
PROBLEM:cross thread exception is fired as soon as the control reaches the statement where I Modify the SelectIndex property from the select case at Module1.While, on my other PC, the SelectIndex property is changed, but the next tab is not shown.
BUT, if I put all this code in a button control, and try to activate from there, then it works perfectly. However, I have to navigate through the tab controls using my self made device.I searched a lot on net and came across a solution which describes that we have to use delegate function and invokeRequired methods to ensure that the procedures run on the same thread.I am not able to decide that where exactly shoud the code for delegates and all be written, in form1, or form2, or module1.Also, in the hit and try that I did, I always got the value of InvoleRequired as False.
Here is the part of Code that I wrote for Delegates
Code:
'Form 1 is BLINDHELPER_SIGNIN
'form 2 is BLINDHELPER_USER
' I have defined these at Module1
Public Delegate Sub DeleToManageTabs(ByVal tb As TabControl)
Public Sub manage_Tabs(ByVal tab As TabControl)
MsgBox(tab.Name)
[code]....
After using this code also, there is no change in working of my application.
I created a Windows Application using VB.NET 2005 Express Edition.In my project I have two references to DLLs from a 3rd part product, so that I could access its API (Ascent Capture 7.5 from Kofax if you needed to know).For the two references, I have set the Copy Local property to False, and in the app.config file I am using assemblyBinding to reference one of the DLLs.When I build the application and then execute the EXE file in the inRelease folder, everything works fine. When I do a publish and try to run the setup.exe application that is created, I get an error message that basically states the DLL I referenced in the app.config file needs to be installed in the GAC.So why does my application work fine from the Release folder without having to do anything to the GAC, but I cannot install using the setup.exe from the Publish? I would like to use the setup.exe because I need to install this on other machines than my own.
View 1 RepliesThis is a very simple piece of code involving threading and events. I am just refreshing the old grey matter as I find myself off work sick for a period of time.
Code:
Imports System.Threading
Imports System.Threading.Thread
Module Module1
[CODE]...
I have a form with a tab control, containing a small number of tab pages. I'm writing a sub procedure to clear the controls within a groupbox for the selected tab. A selected tab will only ever contain ONE groupbox and within a groupbox will be command buttons, labels, text boxes and possibly a combobox. The first block of code below firstly finds the groupbox within the selected tab. The next part loops around all control type and if of type texbox clears the text.
Now hears the head scratcher/confusion it error's with :-
Unable to cast object of type 'System.Windows.Forms.Button' to type 'System.Windows.Forms.GroupBox
Which I don't understand as I cant see where Im converting objects simply looping through all controls and then ONLY if type of control is textbox then clear text.
'Loop around all controls in form, simplified that all controls
'are within a SINGLE groupbox and clear contents or reset to default value
Dim groupbox = (From grpbx In tabAdmin.SelectedTab.Controls _
Select grpbx = DirectCast(grpbx, GroupBox) _
Where TypeOf grpbx Is GroupBox)
[Code] .....
I'm trying to copy multiple excel source files into one excel file. My current code is working only for 3 source files..If more than 3 files are there, it doesn't copy the data but creates blank work sheet in the output excel file. Lets say I have a source folder with 5 excel files. Each workbook contains one worksheet with data. It copies upto 3 worksheets along with data into output excel file.
Lets say excel1 contains A as work sheet, excel2 contains B as work sheet ,excel3 contains C as work sheet ,excel4 contains D as work sheet ,excel5 contains E as work sheet .Now my output excel file should look like..OutputExcel with A, B, C, D, E along with respective data.But my current code is giving output as A,B,C worksheets along with respective data but its creating blank sheet1,sheet2 in place of D & E.
SSIS Script Task Vb.Net Code:
Public
Sub Main()
Dim filePath
As
String =
[code].....
I am working in excel trying to setup a function involving multiplying a cell by a set number and then having the result round to the nearest 10. Here's the beginning of my function statement fx=e3*1.026. say the result is 8654, I need it to round to 8650. Also if it comes back 8655, I need it to round to 8660. I have about 2,000 records I need to do this to so I was hoping that one formula or statement could be used for all my data.
View 2 RepliesI know how to create a file, but would it be possible to create multiple files? the number I would like to create is determined from the number in a textbox, i.e., if the textbox had 2 then I would create 2 files, if it had 5 then I would create 5 files.
My code to create file
System.IO.File.WriteAllText("C:\Test.txt", "")