ie.navigate - user/pass

[hamed_m]

این سئوال رو در بخش وی اف پی مطرح کرده ام اما نیاز به همیاری دوستان وب کار داره.

این کد رو ببینید:



IE = CreateObject("InternetExplorer.Application")
IE.Visible=.F.
WITH IE
.Navigate("about:blank")
.Navigate("file://c:/my.html")
DO WHILE (.Busy() .or. (.ReadyState <> 4))
DOEVENTS
ENDDO
.Document.Forms(0).Submit()
ENDWITH


فایل c:/my.html یه فرم داره که یک آیتم رو ست میکنه.



<form action='http://192.168.2.100/set.php' method='POST' name='set1'>
<select name='connected'><option selected value='1'>yes</option></select>
<input type='submit'>
</form>


مشکل اینجاست که دسترسی به 192.168.2.100 نیاز به یوزر و پس داره. البته winhttp و خود اکسپلورر یوزر و پس رو سئوال میکنه و فرم یا کوکی وجود نداره که بشه اونها رو هم وارد کرد.
استفاده از ارسال کی ممکنه. مثلا:



sp=Createobject("Wscript.Shell")
sp.SendKeys('admin')
sp.SendKeys("{TAB}")
sp.SendKeys('pass')
sp.SendKeys("{ENTER}")


اما بسیار نامطمئنه. مخصوصا اینکه نمیدونیم یوزر از چه کامپیوتری و با چه سرعتی استفاده میکنه. روی کامپیوترهای ضعیف یا مثلا زمانیکه همزمان ویندوز به کار دیگه ای مشغوله و یوزر پنجره دیگه ای رو باز کرده تمام کلیدها به اون صفحه ارسال میشه و درست عمل نمیکنه.
دوستان کسی میدونه برای دسترسی به 192.168.2.100 راهی برای http authorize با استفاده از توابع ویندوز وجود داره؟
ممنون