VB.net環(huán)境下 不接壓直接讀取GZ壓縮文件內(nèi)容?能實(shí)現(xiàn)嗎？

直接讀取 一個(gè)gz壓縮文件：

創(chuàng)新互聯(lián)建站技術(shù)團(tuán)隊(duì)10余年來(lái)致力于為客戶(hù)提供成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作、外貿(mào)營(yíng)銷(xiāo)網(wǎng)站建設(shè)、高端網(wǎng)站設(shè)計(jì)、成都全網(wǎng)營(yíng)銷(xiāo)推廣、搜索引擎SEO優(yōu)化等服務(wù)。經(jīng)過(guò)多年發(fā)展，公司擁有經(jīng)驗(yàn)豐富的技術(shù)團(tuán)隊(duì)，先后服務(wù)、推廣了數(shù)千家網(wǎng)站，包括各類(lèi)中小企業(yè)、企事單位、高校等機(jī)構(gòu)單位。

我直接創(chuàng)建了一個(gè)內(nèi)容："asdfasdfasfd" 的 1.txt文件并用gzip 壓縮。

讀取：

$ zcat 1.txt.gz

asdfasdfasfd

如果內(nèi)容過(guò)長(zhǎng)可以接 less 查看：

$ zcat 1.txt.gz | less

vb.net進(jìn)行文件壓縮

如果機(jī)器安裝有winRar軟件，就可以通過(guò)shell來(lái)借用他的功能達(dá)到壓縮文件的效果；

參考代碼如下：

Dim DeliveryF As String = Server.MapPath("..\Temp\DeliveryFactors.xls") '原始文件 (壓縮前)

Dim TruckInfo As String = Server.MapPath("..\Temp\TruckInformation.xls")

Dim QDetail As String = Server.MapPath("..\Temp\QuotationDetail.xls")

'用shell命令調(diào)用winrar.exe創(chuàng)建壓縮文件()

Dim winRarexe As String = "C:\Program Files\WinRAR\Rar" 'winzip 執(zhí)行文件的位置

Dim wtarget As String = "C:\temp\QuotationVAComparsion.zip" '目地文件 (壓縮后)

Dim command As String = winRarexe " a " wtarget " " DeliveryF " " TruckInfo " " QDetail

'這個(gè)命令你可以查看winrar的命令集

Dim retval As Double 'Shell 指令傳回值

retval = Shell(command, AppWinStyle.MinimizedFocus)

求大神指點(diǎn)vb.net 怎么釋放資源里面的壓縮包 rar呢

1、你先搞懂 winrar.exe 的解壓參數(shù)格式，然后把winrar.exe和相關(guān)文件加入到資源文件中，然后調(diào)用 資源文件中的winrar.exe

2、弄明白rar/zip文件解壓/壓縮方法和格式，自己寫(xiě)程序 (可能會(huì)比較麻煩)

VB.net 如何將TXT文件轉(zhuǎn)換壓縮成.gz文件

手機(jī)敲很累的！一定要給分?。「袷绞牵簍ar 選項(xiàng) 文件.選項(xiàng)有 -c:產(chǎn)生打包文件 -v:顯示詳細(xì)信息 -f:指定壓縮后的文件名 -z:打包同時(shí)壓縮！舉個(gè)例子吧！將目錄my打包并壓縮成my.tar.gz就這樣tar -zcvf my.tar.gz my