Alright. thank you I'm gonna try it tomorrow.
Admin could you please evaluate my codes if I'm doing wrong or nothing.
Here's the progress of my fixing some problem with the memory usage and processing takes long.
I also put some of your suggested codes and format.
Private Sub...
The reason why I want to know how it's works. because I want to clean and separate my ugly codes like this.
outputPath = Path.Combine(txtOutputPath.Text, txtOutputFilename.Text & ".ts")
Dim newWorker As BackgroundWorker = DirectCast(sender, BackgroundWorker)
Dim IV(15) As Byte...
I know a little about AES but without using function.
I just can't really understand how function works. although it's obviously I can see the path and input. But I'm still learning how to implement it in my main code.
Could someone help me.
I found this code from somewhere but I don't know how I can use this in my input files
I want to have the output file
I really don't know much how to use function.
Class Decrypter
Public Shared Function AES128Decrypt(ByVal filePath As String, ByVal keyByte As...
Ah alright so it's really normal. I thought there's wrong with using filestream.
Could you tell me about using block? as you mention in previous message
Sir could tell me what else I can improve with this codes?
I tried everything and change codes but still the process is slow on 1GB files
here's the code:
Private Sub BGW_DoWork(sender As Object, e As DoWorkEventArgs) Handles BGW.DoWork
outputPath = Path.Combine(txtOutputfolder.Text...
ahm. could you give me sample to make changes for my progressbar?
I'm processing files inside the listview
So it's just normal? sometimes the process is faster
Is there any method to make the process less cpu and ram usage?
I've already fixed this Admin.
What I did is just count the items inside the listview and it worked.
But do you suggest some way to make the process faster? it looks like the progressbar is causing the process become slow
Could someone help me fix this codes?
It's only getting 51% result when the process is done
Dim counter As Double = 1
Dim outputFolder As String = txtFileOutput.Text + "\" + txtFileName.Text + ".ts"
Dim encryptionKey As Byte() = File.ReadAllBytes(txtKeyFile.Text)
Dim...
I already fixed with this. I didn't notice the flush and close filestream
Dim counter As Double = 1
Dim inputFolder As String = txtSource.Text
Dim outputFolder As String = txtOutputFolder.Text + "\" + txtOuputFilename.Text + ".ts"
Dim enumFiles = Directory.EnumerateFiles(inputFolder...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.