Vraag : Automatische login aan website die Visuele Fundamentele 6 gebruiken

Ik heb problemen met deze code. Ive slaagde erin om de code ertoe te brengen om de gebruikersbenaming en het wachtwoord aan mijn media server automatisch in te gaan. Het probleem ik heb probeert om Visuele Fundamentele 6 ertoe te brengen om het teken in/login button.

I automaticaly te duwen krijgt Runtime Fout „438 "
object steunt dit bezit niet of method.

It schijnt om naar de Login1_LoginButton- sectielijn 22.

Anyone te richten heeft een andere methodes please.

Thanks,
matt

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:

Public SubLoginMediaCentre (ByVal szUserName als Koord, ByVal szPassword als Koord)
  
  Verduister D.W.Z. als Voorwerp
  
  Reeks D.W.Z. = CreateObject („InternetExplorer.Application“)
  
  IE.Visible = Waar
  
  'Navigeer aan de Server van Media.
  IE.Navigate „http://mediaserver:49490/login.aspx?ReturnUrl=%2fdefault.aspx“
  
  'Wacht op de te laden pagina.
  Doe terwijl IE.Busy of IE.ReadyState <> 4
    DoEvents
  Lijn
 
  'Ga gebruikersbenaming in
  IE.Document.getElementById („Login1_UserName“). Waarde = szUserName
  'Ga wachtwoord in
  IE.Document.getElementById („Login1_Password“). Waarde = szPassword
  'Leg binnen het teken voor.
  IE.Document.getElementById („Login1_LoginButton“). Leg voor
  
  
  'Vernietig voorwerp.
  Reeks D.W.Z. = niets

Sub van het eind

Privé SubForm_Load ()
LoginMediaCentre „mcuser“, „wachtwoord“
Maak me leeg
Beëindig Sub

Antwoord : Automatische login aan website die Visuele Fundamentele 6 gebruiken

De websiteverbinding werkt niet voor me maar u kunt gebruiken proberen. Klik () methode in plaats van. Leg () voor om te zien of dat werk.  U kunt verifiëren dat (er Login1_LoginButton) bestaat en dat het niet om het even welke typo fout is?

1:

IE.Document.getElementById („Login1_LoginButton“). Klik
Andere oplossingen  
 
programming4us programming4us