Automatischer Login

  • VB.NET

Es gibt 5 Antworten in diesem Thema. Der letzte Beitrag () ist von MarcoQuinten.

    Automatischer Login

    Hallo. Ich sitze schon länger an einem automatischen Login System für eine Webseite.
    konkret geht es dabei um moviestarplanet.de

    Ich verwende folgenden Code:

    VB.NET-Quellcode

    1. Dim postdata As String = "username=USERNAME&password=PASSWORT"
    2. Dim encoding As New UTF8Encoding
    3. Dim byteData As Byte() = encoding.GetBytes(postData)
    4. Dim postReq As HttpWebRequest=DirectCast(WebRequest.Create("http://www.moviestarplanet.de/Webservice/Service.asmx/Login2"), HttpWebRequest)
    6. postReq.Method = "POST"
    7. postReq.KeepAlive = True
    8. postReq.Host = "www.moviestarplanet.de"
    9. postReq.ContentLength = byteData.Length
    10. postReq.Referer = "http://www.moviestarplanet.de/Webservice/Service.asmx/Login2"
    11. postReq.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 6.1; de; rv:1.9.1.3) Gecko/20090824 Firefox/3.5.3 (.NET CLR 3.5.30729)""
    12. postReq.ContentType = "application/x-www-form-urlencoded"
    13. postReq.MediaType = "HTTP/1.1 200"
    15. Dim postreqstream As Stream = postReq.GetRequestStream()
    16. postreqstream.Write(byteData, 0, byteData.Length)
    17. postreqstream.Close()
    19. Dim postresponse As HttpWebResponse
    20. postresponse = DirectCast(postReq.GetResponse(), HttpWebResponse)
    21. Dim postreqreader As New StreamReader(postresponse.GetResponseStream())
    23. Dim thepage As String = postreqreader.ReadToEnd

    Mit...

    VB.NET-Quellcode

    1. Msgbox(thepage)

    ...erhalte ich ein XML Dokument mit Userdaten.

    Spoiler anzeigen

    XML-Quellcode

    1. HTTP/1.1 200 OKContent-Type: text/xml; charset=utf-8
    2. Content-Length: length
    4. <?xml version="1.0" encoding="utf-8"?>
    5. <LoginStatus2 xmlns="http://moviestarplanet.com/">
    6. <loginStatus>
    7. <status>string</status>
    8. <actor>
    9. <ActorId>int</ActorId>
    10. <Name>string</Name>
    11. <Level>int</Level>
    12. <SkinSWF>string</SkinSWF>
    13. <SkinColor>string</SkinColor>
    14. <NoseId>int</NoseId>
    15. <EyeId>int</EyeId>
    16. <MouthId>int</MouthId>
    17. <Money>int</Money>
    18. <EyeColors>string</EyeColors>
    19. <MouthColors>string</MouthColors>
    20. <Fame>int</Fame>
    21. <Fortune>int</Fortune>
    22. <FriendCount>int</FriendCount>
    23. <ProfileText>string</ProfileText>
    24. <Created>dateTime</Created>
    25. <LastLogin>dateTime</LastLogin>
    26. <Moderator>int</Moderator>
    27. <ProfileDisplays>int</ProfileDisplays>
    28. <FavoriteMovie>string</FavoriteMovie>
    29. <FavoriteActor>string</FavoriteActor>
    30. <FavoriteActress>string</FavoriteActress>
    31. <FavoriteSinger>string</FavoriteSinger>
    32. <FavoriteSong>string</FavoriteSong>
    33. <IsExtra>int</IsExtra>
    34. <HasUnreadMessages>int</HasUnreadMessages>
    35. <InvitedByActorId>int</InvitedByActorId>
    36. <PollTaken>int</PollTaken>
    37. <ValueOfGiftsReceived>int</ValueOfGiftsReceived>
    38. <ValueOfGiftsGiven>int</ValueOfGiftsGiven>
    39. <NumberOfGiftsGiven>int</NumberOfGiftsGiven>
    40. <NumberOfGiftsReceived>int</NumberOfGiftsReceived>
    41. <NumberOfAutographsReceived>int</NumberOfAutographsReceived>
    42. <NumberOfAutographsGiven>int</NumberOfAutographsGiven>
    43. <TimeOfLastAutographGiven>dateTime</TimeOfLastAutographGiven>
    44. <FacebookId>string</FacebookId>
    45. <BoyfriendId>int</BoyfriendId>
    46. <BoyfriendStatus>int</BoyfriendStatus>
    47. <MembershipPurchasedDate>dateTime</MembershipPurchasedDate>
    48. <MembershipTimeoutDate>dateTime</MembershipTimeoutDate>
    49. <MembershipGiftRecievedDate>dateTime</MembershipGiftRecievedDate>
    50. <BehaviourStatus>int</BehaviourStatus>
    51. <LockedUntil>dateTime</LockedUntil>
    52. <LockedText>string</LockedText>
    53. <BadWordCount>int</BadWordCount>
    54. <PurchaseTimeoutDate>dateTime</PurchaseTimeoutDate>
    55. <EmailValidated>int</EmailValidated>
    56. <RetentionStatus>int</RetentionStatus>
    57. <GiftStatus>int</GiftStatus>
    58. <MarketingNextStepLogins>int</MarketingNextStepLogins>
    59. <MarketingStep>int</MarketingStep>
    60. <TotalVipDays>int</TotalVipDays>
    61. <RecyclePoints>int</RecyclePoints>
    62. <EmailSettings>int</EmailSettings>
    63. <TimeOfLastAutographGivenStr>string</TimeOfLastAutographGivenStr>
    64. <BestFriendId>int</BestFriendId>
    65. <BestFriendStatus>int</BestFriendStatus>
    66. <FriendCountVIP>int</FriendCountVIP>
    67. <ForceNameChange>int</ForceNameChange>
    68. <CreationRewardStep>int</CreationRewardStep>
    69. <CreationRewardLastAwardDate>dateTime</CreationRewardLastAwardDate>
    70. <NameBeforeDeleted>string</NameBeforeDeleted>
    71. <LastTransactionId>int</LastTransactionId>
    72. <AllowCommunication>int</AllowCommunication>
    73. <Diamonds>int</Diamonds>
    74. <BoyFriend>
    75. <ActorId>int</ActorId>
    76. <Name>string</Name>
    77. <SkinSWF>string</SkinSWF>
    78. </BoyFriend>
    79. <ActorPersonalInfo>
    80. <ActorId>int</ActorId>
    81. <BirthDate>dateTime</BirthDate>
    82. <ParentEmail>string</ParentEmail>
    83. <ChatAllowed>int</ChatAllowed>
    84. <ActorEmailAllowed>int</ActorEmailAllowed>
    85. <BirthMonth>short</BirthMonth>
    86. <BirthYear>short</BirthYear>
    87. <ParentConsentEmailSent>boolean</ParentConsentEmailSent>
    88. <UserEmailParentOptOut>boolean</UserEmailParentOptOut>
    89. <ParentEmailConfirmed>boolean</ParentEmailConfirmed>
    90. <RealBirthdayCollected>boolean</RealBirthdayCollected>
    91. </ActorPersonalInfo>
    92. <ActorRelationships>
    93. <ActorRelationship d5p1:nil="true" xmlns:d5p1="http://www.w3.org/2001/XMLSchema-instance" />
    94. <ActorRelationship d5p1:nil="true" xmlns:d5p1="http://www.w3.org/2001/XMLSchema-instance" />
    95. </ActorRelationships>
    96. </actor>
    97. <statusDetails>string</statusDetails>
    98. <actorLocale>
    99. <string>string</string>
    100. <string>string</string>
    101. </actorLocale>
    102. <lbs>
    103. <string>string</string>
    104. <string>string</string>
    105. </lbs>
    106. <userType>string</userType>
    107. <adCountryMap>
    108. <AdvertisementCountryMapping>
    109. <ID>int</ID>
    110. <CountryCode>string</CountryCode>
    111. <Vendor>int</Vendor>
    112. <Type>int</Type>
    113. <UseVIP>boolean</UseVIP>
    114. </AdvertisementCountryMapping>
    115. <AdvertisementCountryMapping>
    116. <ID>int</ID>
    117. <CountryCode>string</CountryCode>
    118. <Vendor>int</Vendor>
    119. <Type>int</Type>
    120. <UseVIP>boolean</UseVIP>
    121. </AdvertisementCountryMapping>
    122. </adCountryMap>
    123. </loginStatus>
    124. <hDetails>string</hDetails>
    125. </LoginStatus2>


    Das Problem ist jedoch das der Webbrowser auf der Login-Seite stehen bleibt.
    Danke schon mal im Voraus. :)
    MfG aannleax

    Dieser Beitrag wurde bereits 9 mal editiert, zuletzt von „aannleax“ ()

    Benuzt Du das Webbrowser-Control?

    Ja

    Ansonsten: wie versuchst du die Seite dann aufzurufen?

    Versuch 1:
    Da ich ja quasi eingeloggt bin...
    Spoiler anzeigen

    XML-Quellcode

    1. <loginStatus>
    2. <status>Succes</status>
    3. </loginstatus>


    ..versuchte ich es mit...

    VB.NET-Quellcode

    1. Webbrowser1.Refresh

    Dabei wurde jedoch nur die Seite neu geladen.

    Versuch 2:
    Mit der Navigate-Funktion:

    VB.NET-Quellcode

    1. WebBrowser1.Navigate("http://www.moviestarplanet.de/Webservice/Service.asmx/Login2", "_self", byteData, postReq.Headers.ToString)

    Dann kommt aber nur ein XML-Dokument, mit allen User-Informationen.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „aannleax“ ()

    Da anscheinend niemand wirklich weiter weiß...
    Hat jemand eine Idee Wie man Login-Felder befüllt?

    VB.NET-Quellcode

    1. WebBrowser1.Document.GetElementById("id").InnerText = "Username"

    Klappt das auch bei Flash-Seiten?
    Wenn ja, wie bekomme ich dann die ID von den Feldern raus?

    Danke für jede Antwort.
    MfG aannleax

Facebook
Telefonspende