Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Avlyssna applikation, är det möjligt?

Postades av 2007-05-13 21:08:15 - Johannes Strömberg, i forum vb.net, Tråden har 7 Kommentarer och lästs av 926 personer

Halloj.

Jag har en applikation som vi köpt in av ett företag som tillverkar lagersystem.
Denna applikation skriver ut Acrobatfiler via anrop (wshell) som ser ut som följer:

<code>
AcroRd32 /t C:\PDFer\badabimbadabom.pdf
</code>

Jag misstänker att det finns något problem i deras anrop för utskrifterna men det
dementeras bestämt, finns det något sätt att "avlyssna" de kommandom som
applikationen skickar via wshell till AcroRd32 och sen lagra dem i en vanlig textfil
en rad per anrop??

Något borde väl gå o snickra ihop kan man ju hoppas, jag har en kund modell global
som flåsar i nacken ang. detta lilla problem och jag vet inte riktigt hur jag ska få ordning
på detta. Men någon form av loggning kan ju iallafall utesluta eller bekräfta mina misstankar.

//Johannes


Svara

Sv: Avlyssna applikation, är det möjligt?

Postades av 2007-05-13 21:51:19 - Martin Adrian

Kan du inte bara skapa en acrord32.bat som loggar hur den anropas.


Svara

Sv:Avlyssna applikation, är det möjligt?

Postades av 2007-05-13 22:07:18 - Johannes Strömberg

Hur skulle man göra det isf?


Svara

Sv: Avlyssna applikation, är det möjligt?

Postades av 2007-05-13 22:38:18 - Thomas Roman

Samma princip kan göras med ett program.

VB:<code>MsgBox(Command)</code>

VB.NET (inte .NET-sättet att göra det på men det var inte så noga nu...):<code>Messagebox.Show(Microsoft.VisualBasic.Command)</code>

Döp programmet till AcroRd32.exe och byt ut original-filen mot din.


Thomas


Svara

Sv:Avlyssna applikation, är det möjligt?

Postades av 2007-05-14 13:48:06 - Johannes Strömberg

Jag testade lite med följande kod:

<code>
Dim appruncmd As String = Microsoft.VisualBasic.Command

If IO.Directory.Exists(IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) + "\Loggar") = False Then
IO.Directory.CreateDirectory(IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) + "\Loggar")
End If

Dim sw As New StreamWriter(IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location) + "\Loggar\applog.txt")
sw.BaseStream.Seek(0, System.IO.SeekOrigin.End)
sw.WriteLine(Now & " -- " & appruncmd)
sw.Flush()
sw.Close()

System.Diagnostics.Process.Start("C:\Program\Adobe\Reader 8.0\Reader\AcroRd32.exe " & appruncmd)

Application.Exit()

</code>

och sen i körrutan (Ctrl+R) så skriver jag:

<code>
C:\testapp.exe /t C:\PDFer\blabla.pdf
</code>

(ja jag har en fil som heter blabla.pdf) men då får jag ett fel som säger:

<code>
Information om att aktivera JIT-felsökning i stället för den
här dialogrutan finns i slutet av det här meddelandet.

************** Undantagstext **************
System.ComponentModel.Win32Exception: Det går inte att hitta filen
vid System.Diagnostics.Process.StartWithShellExecuteEx(ProcessStartInfo startInfo)
vid System.Diagnostics.Process.Start()
vid System.Diagnostics.Process.Start(ProcessStartInfo startInfo)
vid System.Diagnostics.Process.Start(String fileName)
vid TestApp.Form1.Form1_Load(Object sender, EventArgs e)
vid System.EventHandler.Invoke(Object sender, EventArgs e)
vid System.Windows.Forms.Form.OnLoad(EventArgs e)
vid System.Windows.Forms.Form.OnCreateControl()
vid System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
vid System.Windows.Forms.Control.CreateControl()
vid System.Windows.Forms.Control.WmShowWindow(Message& m)
vid System.Windows.Forms.Control.WndProc(Message& m)
vid System.Windows.Forms.ScrollableControl.WndProc(Message& m)
vid System.Windows.Forms.ContainerControl.WndProc(Message& m)
vid System.Windows.Forms.Form.WmShowWindow(Message& m)
vid System.Windows.Forms.Form.WndProc(Message& m)
vid System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
vid System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
vid System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)


************** Inlästa sammansättningar **************
mscorlib
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll
----------------------------------------
TestApp
Sammansättningsversion: 1.0.0.0
Win32-version: 1.0.0.0
CodeBase: file:///c:/testapp.exe
----------------------------------------
Microsoft.VisualBasic
Sammansättningsversion: 8.0.0.0
Win32-version: 8.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/Microsoft.VisualBasic/8.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll
----------------------------------------
System
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System/2.0.0.0__b77a5c561934e089/System.dll
----------------------------------------
System.Windows.Forms
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.198 (QFE.050727-1900)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Windows.Forms/2.0.0.0__b77a5c561934e089/System.Windows.Forms.dll
----------------------------------------
System.Drawing
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Drawing/2.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll
----------------------------------------
System.Configuration
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Configuration/2.0.0.0__b03f5f7f11d50a3a/System.Configuration.dll
----------------------------------------
System.Xml
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Xml/2.0.0.0__b77a5c561934e089/System.Xml.dll
----------------------------------------
System.Runtime.Remoting
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Runtime.Remoting/2.0.0.0__b77a5c561934e089/System.Runtime.Remoting.dll
----------------------------------------
mscorlib.resources
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll
----------------------------------------
System.Windows.Forms.resources
Sammansättningsversion: 2.0.0.0
Win32-version: 2.0.50727.42 (RTM.050727-4200)
CodeBase: file:///C:/WINDOWS/assembly/GAC_MSIL/System.Windows.Forms.resources/2.0.0.0_sv_b77a5c561934e089/System.Windows.Forms.resources.dll
----------------------------------------

************** JIT-felsökning **************
För att aktivera JIT-felsökning (just-in-time ) måste .config-filen för det här
tillämpningsprogrammet eller datorn (machine.config) ha
jitDebugging-värdet angivet i avsnittet system.windows.forms.
Tillämpningsprogrammet måste också vara kompilerat med felsökning
aktiverat.

Till exempel:

<configuration>
<system.windows.forms jitDebugging="true" />
</configuration>

När JIT-felsökning är aktiverad kommer alla undantag som inte hanteras
att skickas till JIT-felsökaren som är registrerad på datorn
snarare än att hanteras av den här dialogrutan.
</code>


Varpå jag svarar med att säga "brööl, fan och hans moster!!!"

Vad är det nu som är fel? Om jag kör den utan /t C:\PDFer\blabla.pdf så öppnas Adobe Reader som den ska, men inte om jag slänger på tilläggen.


//Johannes


Svara

Sv: Avlyssna applikation, är det möjligt?

Postades av 2007-05-14 14:01:42 - Simon Dahlbacka

du kan inte mata hela strängen rakt upp och ner i Process.Start(string), (vilket jag antar att du gör) utan du måste skicka argumenten skilt,

antingen via Process.Start(string, string), eller Process.Start(ProcessStartInfo) (och där ProcessStartInfo.Arguments)


Svara

Sv:Avlyssna applikation, är det möjligt?

Postades av 2007-05-14 15:48:37 - Thomas Roman

Som Simon säger, ändra till den här koden:
<code>
System.Diagnostics.Process.Start("C:\Program\Adobe\Reader 8.0\Reader\AcroRd32.exe", appruncmd)
</code>


Thomas


Svara

Sv: Avlyssna applikation, är det möjligt?

Postades av 2007-05-14 15:56:58 - Johannes Strömberg

Har precis gjort det. Nu funkar det fint.. Mange takk! :)


Svara

Nyligen

  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper
  • 16:36 Allt du behöver veta om keramiskt
  • 16:14 Vem anlitar man egentligen när tak

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 725
27 958
271 751
1 179
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies