1 2 3 4 5 6 7 8 9 10 11 12 13
|
Variant vDocument = brwInt->ControlInterface->Document;
if (((IDispatch *)vDocument) != NULL)
{
Variant vForms = vDocument.OlePropertyGet("Forms");
Variant vForm = vForms.OleFunction("NamedItem","connection");
Variant vContent = vForm.OlePropertyGet("All");
Variant vLoginField = vContent.OleFunction("NamedItem","login");
Variant vPassField = vContent.OleFunction("NamedItem","password");
vLoginField.OlePropertySet("Value","UnLogin");
vPassField.OlePropertySet("Value","UnMotDePasse");
vForm.OleProcedure("Submit");
} |
Partager