473,320 Members | 2,054 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,320 software developers and data experts.

Dll

1
Currently am doing a project in VB.I need a DLL that will help me unzip a file.Please do help me with it ASAP
Apr 9 '07 #1
5 1450
Killer42
8,435 Expert 8TB
Currently am doing a project in VB.I need a DLL that will help me unzip a file.Please do help me with it ASAP
What version of VB?
Apr 9 '07 #2
Killer42
8,435 Expert 8TB
By the way, if you have a look at this message in the Newsgroups Archive, I think it has some info on products that might be useful (I haven't checked them out, only glanced at the message).
Apr 9 '07 #3
Killer42
8,435 Expert 8TB
Ok, you've informed me by Private Message that it's VB6. Did my link (see previous message) provide anything useful?
Apr 10 '07 #4
Currently am doing a project in VB.I need a DLL that will help me unzip a file.Please do help me with it ASAP
hello,
I am using Pkzip/pkunzip to zip/unzip file in VB. and its works Fine.
my mail id is <removed by Moderator> if you need those component then u
can mail me I will send you.
I give an example code How to use Pkzip/pkunzip
Expand|Select|Wrap|Line Numbers
  1. Private Function BackupPro()
  2.     Dim Fsys As New FileSystemObject
  3.     Dim Txtfl As TextStream
  4.  
  5.  
  6.     Set Txtfl = Fsys.CreateTextFile(BackUpPath & "Tmp.Bat")
  7.     Txtfl.WriteLine "C:\"
  8.     Txtfl.WriteLine "Cd " & Mid(BackUpPath, 1, Len(BackUpPath) - 1)
  9.     Txtfl.WriteLine "Pkzip " & BackUpPath & "CAADVMdb " & Mdb_Loc
  10.     'Txtfl.WriteLine "Pkzip CAVMdb.ZIP " & Mdb_Loc
  11.     Txtfl.Close
  12.     Shell32Bit BackUpPath & "Tmp.bat" 'using bathc file
  13.  
  14. End Function
  15.  
  16. Private Function RestPro()
  17.     Dim Fsys As New FileSystemObject
  18.     Dim Txtfl As TextStream
  19.  
  20.     Fsys.CopyFile Text1.Text, BackUpPath & "CAADVMdb.ZIP"
  21.  
  22.     Set Txtfl = Fsys.CreateTextFile(BackUpPath & "Tmp.Bat")
  23.     Txtfl.WriteLine "C:\"
  24.     Txtfl.WriteLine "Cd " & Mid(BackUpPath, 1, Len(BackUpPath) - 1)
  25.     Txtfl.WriteLine "pkunzip -o " & BackUpPath & "CAADVMdb.zip " & BackUpPath
  26.     Txtfl.Close
  27.     Shell32Bit BackUpPath & "Tmp.bat"
  28.  
  29.     If Not Fsys.FileExists(BackUpPath & "CA_ADVIC.mdb") Then
  30.            MsgBox "Invalid backup file", vbCritical
  31.            Exit Function
  32.     End If
  33.  
  34.     Fsys.CopyFile BackUpPath & "CA_ADVIC.mdb", Mdb_Loc
  35.     Fsys.DeleteFile BackUpPath & "CA_ADVIC.mdb "
  36.     MsgBox "Restoration Complete", vbInformation
  37. End Function
  38.  
Apr 10 '07 #5
Killer42
8,435 Expert 8TB
I am using Pkzip/pkunzip to zip/unzip file in VB. and its works Fine.
my mail id is...
Thanks for the information.

However, please don't post your e-mail address in the forum. Places like this are frequently scanned by scammer and spammers to grab any addresses they can find. Trust me, you would not like the result.

If you want people to e-mail you, turn on the "Receive Email from Other Members" option in the TSDN control panel (see link, top-right of this page), and make sure your address is correctly saved in your settings. That way, other TSDN members can send you e-mail, but your address is not publically displayed.
Apr 11 '07 #6

Sign in to post your reply or Sign up for a free account.

Similar topics

3
by: William C. White | last post by:
Does anyone know of a way to use PHP /w Authorize.net AIM without using cURL? Our website is hosted on a shared drive and the webhost company doesn't installed additional software (such as cURL)...
2
by: Albert Ahtenberg | last post by:
Hello, I don't know if it is only me but I was sure that header("Location:url") redirects the browser instantly to URL, or at least stops the execution of the code. But appearantely it continues...
3
by: James | last post by:
Hi, I have a form with 2 fields. 'A' 'B' The user completes one of the fields and the form is submitted. On the results page I want to run a query, but this will change subject to which...
0
by: Ollivier Robert | last post by:
Hello, I'm trying to link PHP with Oracle 9.2.0/OCI8 with gcc 3.2.3 on a Solaris9 system. The link succeeds but everytime I try to run php, I get a SEGV from inside the libcnltsh.so library. ...
1
by: Richard Galli | last post by:
I want viewers to compare state laws on a single subject. Imagine a three-column table with a drop-down box on the top. A viewer selects a state from the list, and that state's text fills the...
4
by: Albert Ahtenberg | last post by:
Hello, I have two questions. 1. When the user presses the back button and returns to a form he filled the form is reseted. How do I leave there the values he inserted? 2. When the...
1
by: inderjit S Gabrie | last post by:
Hi all Here is the scenerio ...is it possibly to do this... i am getting valid course dates output on to a web which i have designed ....all is okay so far , look at the following web url ...
2
by: Jack | last post by:
Hi All, What is the PHP equivilent of Oracle bind variables in a SQL statement, e.g. select x from y where z=:parameter Which in asp/jsp would be followed by some statements to bind a value...
3
by: Sandwick | last post by:
I am trying to change the size of a drawing so they are all 3x3. the script below is what i was trying to use to cut it in half ... I get errors. I can display the normal picture but not the...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: jfyes | last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
0
by: ArrayDB | last post by:
The error message I've encountered is; ERROR:root:Error generating model response: exception: access violation writing 0x0000000000005140, which seems to be indicative of an access violation...
1
by: PapaRatzi | last post by:
Hello, I am teaching myself MS Access forms design and Visual Basic. I've created a table to capture a list of Top 30 singles and forms to capture new entries. The final step is a form (unbound)...
1
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
0
by: Faith0G | last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.