Visual Basic

how to encryp and decryp a file?

12-Jul-06 9:44

montu3377 wrote:
My asp.net code execute server Console and that server console application execute the Job and then Job will execute package.

No... How does your application request data from a database? Using a SELECT statement, right? How do you execute a SELECT statement and return a dataset? Same thing, only your not using a SELECT statement, you're using whatever SQL command launches your job on the server!

montu3377 wrote:
Do you have any snappet code/articles which describe scenerio??

Nope.

Dave Kreskowiak
Microsoft MVP - Visual Basic

vbvic12-Jul-06 6:00

12-Jul-06 6:00

i need help...

Bob X12-Jul-06 6:03

12-Jul-06 6:03

If your using .net, use the Rijndael Class to encrypt and decrypt files.

LifeIsSad12-Jul-06 6:05

LifeIsSad

12-Jul-06 6:05

any sample code to see?...or any links useful..i nd to know how to do tt too

Bob X12-Jul-06 6:12

12-Jul-06 6:12

LifeIsSad wrote:
any sample code to see?...

Sorry, I'm actually a C/C++ programmer so I don't have any VB code for you, although MSDN Library[^] has a section on the Rijndael Class.
If you search here on CP you might find some code that simplifies the process for you.

LifeIsSad12-Jul-06 6:14

LifeIsSad

12-Jul-06 6:14

oh..ok..thx alot..=)

vbvic12-Jul-06 6:15

12-Jul-06 6:15

ok...thanks bro...gud luck

vbvic12-Jul-06 6:18

12-Jul-06 6:18

or mayb u hav ani c prgming codes for us to reference on encrpy and decryp?

Bob X12-Jul-06 6:24

12-Jul-06 6:24

Here[^] is a C++ library which will use the .net Rijndael class to encrypt or decrypt a file.
If I remember correctly, You just have to pass one call with the file to encrypt and the destination path, and It will complete all of the encryption for you.

vbvic12-Jul-06 6:30

12-Jul-06 6:30

ok ... 10s bro... i beleive you help alot...

PlayByTheRules13-Jul-06 2:42

PlayByTheRules

13-Jul-06 2:42

vbvic wrote:
or mayb u hav ani c prgming codes for us to reference on encrpy and decryp?

What the hell is that supposed to mean

vbvic wrote:
mayb

Are you really that lazy you cannot type an extra character.

vbvic wrote:
u

Switching to Dutch mid-sentence is quite confusing.

vbvic wrote:
hav

Or maybe you do not have an E key. Geez

vbvic wrote:
prgming

programming?

vbvic wrote:
encrpy

-ption. Seriously, are you so lazy you cannot finish off words.

vbvic wrote:
decryp

-ption. Again. How lazy can one person be!?

Agus Budianto14-Jul-06 5:24

Agus Budianto

14-Jul-06 5:24

yup that's right, how can? D'Oh! | :doh:

vbvic12-Jul-06 6:09

Re: how to encryp and decryp a file? [modified]

12-Jul-06 6:09

iam not reali familiar wif vb platform... i tried these codes
im usin vb6
=============================================================
Private Declare Function EncryptFile Lib "ADVAPI32" Alias _
"EncryptFileA" (ByVal lpFileName As String) As Boolean
Private Declare Function DecryptFile Lib "ADVAPI32" Alias _
"DecryptFileA" (ByVal lpFileName As String, ByVal dwReserved As Long) As Boolean

Public Function Encrypt(ByVal strFileName As String) As Boolean
Encrypt = (EncryptFile(strFileName) = True)
End Function

Public Function Decrypt(ByVal strFileName As String)
Decrypt = (DecryptFile(strFileName, 0) = True)
End Function

Private Sub Command1_Click()
If Encrypt("c:\temp\MyFile.txt") Then
MsgBox "It Worked"
Else
MsgBox "It Failed"
End If
End Sub
===============================================================
it wont work...

Bob X12-Jul-06 6:19

12-Jul-06 6:19

Sorry, being a C/C++ programmer, I can't read your code very well.

It looks like you don't have a condition that will show "it worked";

vbvic wrote:
Private Sub Command1_Click()
If Encrypt("c:\temp\MyFile.txt") Then
MsgBox "It Worked"
Else
MsgBox "It Failed"
End If
End Sub

Have you adding " = 1" after "Encrypt(<filepath>) Then"
ex: "Encrypt(<filepath>) = 1 Then"

I hope that works for you.

-- modified at 12:24 Wednesday 12th July, 2006

p.s. If you are calling the encrypt function in .net, you will not be able to encrypt the file, because the .net encrypt function encrypts only already sized blocks of data. You will only end up encrypting the string you pass to the encrypt function. You have to put the data into block sizes first.

punkgila12-Jul-06 6:30

punkgila

12-Jul-06 6:30

Hey Bob

How do I put the data into block sizes?

Thanks

Bob X12-Jul-06 6:40

12-Jul-06 6:40

There is another member of the .net Rijndael class that will put the data into appropriate block sizes, Although I don't recall which member you need offhand.

outlook express [modified]

punkgila12-Jul-06 6:19

punkgila

12-Jul-06 6:19

Hey there vbvic. I've had to do a similar project myself. I was tasked to create a simple program that could lock or unlock a file just by the click of two respective buttons. Being a VB noob, I thought that encrypting would be the right way to go.

Anyone could enlighten me with some sample codes to get started?

Thanks in advance.

microuser_200012-Jul-06 5:25

12-Jul-06 5:25

hellow to all ..
i am trying to work with Microsoft Outlook 11.0 Objects Library but i can't find it in my COM Obects list ..
what can i do ?
can i down load it from anywhere ?
thxx

-- modified at 11:27 Wednesday 12th July, 2006

Dave Kreskowiak12-Jul-06 6:50

12-Jul-06 6:50

Outlook Express doesn't expose a COM OBject model. Only the Office version of Outlook does. If you can't find this library under the COM tab, in References, then you don't have Office's Outlook installed or you haven't installed the .NET Framework programming support option when you installed Office.

Dave Kreskowiak
Microsoft MVP - Visual Basic

microuser_200012-Jul-06 11:37

12-Jul-06 11:37

aha i understand thank u
what i wanna do is a simple thing when i click on a text that have an email address to pop a outlook express new mail message window and to have in it the email address that i had click at , just like the simple html , thxx

Dave Kreskowiak12-Jul-06 12:17

12-Jul-06 12:17

You can launch the default mail client simply by starting a new Process and giving it a command line of "mailto:emailaddress@somewhere.com".

Dave Kreskowiak
Microsoft MVP - Visual Basic

microuser_200012-Jul-06 20:41

12-Jul-06 20:41

and where i can find how to do this ?
thxx

microuser_200012-Jul-06 21:27

12-Jul-06 21:27

i had started a new process but when i pass to it the mailto command it dosen't work , i don't get the new mail message window

objProcess = New System.Diagnostics.Process
objProcess.Start("C:\Program Files\Outlook Express\msimn.exe", "mailto:microuser@gmail.com")

Dave Kreskowiak13-Jul-06 1:25