深刻な助けが必要です。私は困っています。私が得ることができる助けをいただければ幸いです。私は何時間もウェブを検索しましたが、手ぶらでやってきました。ディレクトリで再帰を行い、すべての画像を PDF に変換するプロジェクトを作成しました。私は itextsharp と pdfsharp を使用しています (お互いがないとうまく動作しないようです)。とにかく、Visual Studio がアセンブリについて不平を言うまで、プロジェクトは完璧に機能していました。これは、VS が問題を修正するとアセンブリが壊れることを最後に学んだことです。だから、私はそれを無視しました。[ここにカラフルな言葉を挿入] ベータ版のテストで電話をしている間、彼は私を混乱させ、私は VS がスローしているという警告をクリックすることになりました。クリックすると、次のエラーが発生し始めました: 1) PDF ファイルを変換すると、ディレクトリ内のファイルの最初の 15 バイトのみが変換されます。2) PDF が既に存在する場合、キャプションの例外でエラーが発生します。これが私が取り組んでいるコードで、完全に機能していました。
WebException が処理されませんでした (これは WEB APP ではありません) 別のプロセスによって使用されているため、プロセスはファイル 'filepath\andname.pdf' にアクセスできません。
これより前に、アプリケーションの app.config セクションに元のコードをロードすると、次のエラーが発生しました。
FileLoadException は処理されませんでした ファイルまたはアセンブリ 'itextsharp、Version=5.3.2.0、Culture=neutral、PublicKeyToken=8354ae6d2174ddca' またはその依存関係の 1 つを読み込めませんでした。見つかったアセンブリのマニフェスト定義がアセンブリ参照と一致しません。(HRESULT からの例外: 0x80131040)
この男の首を絞め、闇市場で彼の肝臓を売る前に、誰か助けてくれませんか? これは地獄のようにイライラします。私はそれを大いに感謝します。
./x86
キャプションのようにアクセスを爆撃し、アプリケーションに 15 バイトしか追加しない app.config ファイルの順序:
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="TAMI.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<system.diagnostics>
</system.diagnostics>
<userSettings>
<TAMI.My.MySettings>
<setting name="scanner" serializeAs="String">
<value />
</setting>
<setting name="authenticated_user" serializeAs="String">
<value />
</setting>
</TAMI.My.MySettings>
</userSettings>
</configuration>
不適切なバージョンでエラーが発生するアセンブリ
<?xml version="1.0"?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="TAMI.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
</sectionGroup>
</configSections>
<system.diagnostics>
<sources>
<!-- This section defines the logging configuration for My.Application.Log -->
<source name="DefaultSource" switchName="DefaultSwitch">
<listeners>
<add name="FileLog"/>
<!-- Uncomment the below section to write to the Application Event Log -->
<!--<add name="EventLog"/>-->
</listeners>
</source>
</sources>
<switches>
<add name="DefaultSwitch" value="Information"/>
</switches>
<sharedListeners>
<add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>
<!-- Uncomment the below section and replace APPLICATION_NAME with the name of your application to write to the Application Event Log -->
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
</sharedListeners>
</system.diagnostics>
<userSettings>
<TAMI.My.MySettings>
<setting name="scanner" serializeAs="String">
<value/>
</setting>
<setting name="authenticated_user" serializeAs="String">
<value/>
</setting>
</TAMI.My.MySettings>
</userSettings>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly>
<assemblyIdentity name="itextsharp" publicKeyToken="8354AE6D2174DDCA" culture="neutral"/>
<bindingRedirect oldVersion="0.0.0.0-5.3.2.0" newVersion="5.3.2.0"/>
</dependentAssembly>
</assemblyBinding>
</runtime>
</configuration>
THE CODE IVE ずっと使ってきた
For b As Integer = 0 To lboxconv.Items.Count - 1
Application.DoEvents()
Dim extension = Microsoft.VisualBasic.Right(b, 3)
Dim doc As New Document()
Dim File_Type As String
File_Type = Replace(lboxconv.Items(b), ".png", ".pdf", vbTextCompare)
Dim writer As PdfWriter = PdfWriter.GetInstance(doc, New FileStream(File_Type, FileMode.Create))
doc.Open()
Dim imgpath As String = lboxconv.Items(b)
Dim png As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance(imgpath)
png.ScaleToFit("500", "500")
png.Alignment = Element.ALIGN_CENTER
doc.Add(png)
doc.Close()
Next
誰か助けてください!私は必死で、時間と答えを使い果たしています。