1 do >
4 de IE.Busy ou de IE.ReadyState DoEvents Laço 'Incorporar o username IE.Document.getElementById (“Login1_UserName”). Valor = szUserName 'Incorporar a senha IE.Document.getElementById (“Login1_Password”). Valor = szPassword 'Submeter o sinal dentro. IE.Document.getElementById (“Login1_LoginButton”). Submeter 'Destruir o objeto. Ajustar IE = nada Terminar o submarino Form_Load secundário confidencial () LoginMediaCentre “mcuser”, “senha” Descarregar-me Terminar o submarino class= > " desobstruído " de
A ligação do Web site não trabalha para mim mas você pode tentar a utilização. Estalar () o método em vez de. Submeter () para ver se isso trabalha. Você pode verific que (Login1_LoginButton) existe e que não é nenhum erro do erro tipográfico?
1:
IE.Document.getElementById (“Login1_LoginButton”). Clique