היי,

אני חדש בתחם התכנות וקיבלתי משימה בעבודה לבצע שאיבה מאתר לתוך קובץ ולא משנה באיזו שפת תכנות ...

אז מצאתי בVBS משהו רק שיניתי את שם האתר . אבל אני מקבל הודעת שגיאה :

activex component can't create object code 800a01ad

רצוי לציין שאין לי visual studio או עורך מתוחכם אחר . הכל דרך vbsedit

זה הפתרון שניסיתי:

http://stackoverflow.com/questions/2429477/cannot-use-createobject-from-vb-scripts-on-windows-7

זה הסקריפט רק תשנו את שם האתר www.sitename.com לאיזה אתר שבא לכם... אבל זה פשוט לא עובד

Option Explicit

Const HTMLFileIn=http://www.SitenName.com

Const DocFileOut="c:\newfile.doc"

Dim MyWord,oIE

set MyWord=CreateObject("Word.Document") 

Set oIE = CreateObject("InternetExplorer.Application")

oIE.Navigate HTMLFileIn

Wscript.Sleep 500

oIE.document.body.createTextRange.execCommand("Copy")

Wscript.Sleep 500

MyWord.Content.Paste

MyWord.SaveAs DocFileOut

MyWord.Close

oIE.Quit

Set oIE = Nothing

set MyWord = Nothing 

Wscript.Echo HTMLFileIn & " is now saved as " & DocFileOut

Sub wait

  Wscript.Sleep 500

  While oIE.busy

    Wscript.Sleep 1000

  Wend

  While oIE.Document.readyState <> "complete"

    Wscript.Sleep 1000

  Wend

End Sub

תודה רבה

עזוב אותך מ-vbscript. בהנחה שאתה משתמש ב-windows 7 ומעלה, אתה יכול להשתמש ב-powershell. צור קובץ עם סיומת ps1 והדבק בו את הקוד הזה:

(New-Object System.Net.WebClient).DownloadFile("URL", "filename")

כשבמקום URL שים את הכתובת של הקובץ שאתה רוצה להוריד ובמקום filename את המקום שבו אתה רוצה לשמור אותו.

נ.ב. להבא כשאתה כותב קוד, תשתמש בכפתור הכנס קוד (כפתור עם ציור #) כדי שיהיה יותר ברור.

נערך 2014 בינואר 2511 שנים על-ידי שניצל

ממתי VBS זה תכנות?

לא רק שיש לך יכולת לבצע את את כ One-liner בPS. אתה יכול גם להשתמש בסטנדרט כמו w-get (בלי המקף. סעמק עם המודול Secure של האתר...).

w-get לא מובנה ב-windows...

זה לא עובד

נתתי לו את שם האתר כמו שאמרת ואת הנתיב לשמירה וזה לא עובד.

ניסיתי לתת לו רק נתיב ניסיתי לתת נתיב עם שם הקובץ ....

מה לא בסדר?

מה זה "לא עובד"? מה עשית בדיוק ומה התוצאה בדיוק?

ואו אתה מהיר

זאת ההודעת שגיאה שקיבלתי:

File C:\Users\orel\Desktop\testtest.ps1 cannot be loaded because the execution of scripts is disabled on this system.

Please see "get-help about_signing" for more details.

זה תכולת הסקריפט

 (New-Object System.Net.WebClient).DownloadFile([URL]http://www.testsite.com[/URL], "C:\Users\UserName\Desktop\New folder\test.doc")

ניסית לחפש בגוגל את הודעת השגיאה? יש עשרות לינקים עם הצעות לפתרון.

אני בדיוק בא לרשום שמצאתי פתרוןן,

זה מה שעזר:

צריך לרשום את זה ב power Shell

Set-ExecutionPolicy Unrestricted

תודה רבה על העזרה מר שניצל

תגיד , עוד שאלה . האם אפשר לקחת את זה צעד אחד קדימה ולבקש ממנו את 100 השורות הראשונות מתוך רשימה? נגיד 100 האפליקציות הראשונות שמופיעות ברשימה של אפליקציות?

מה זה "רשימת אפליקציות"?

אפשר הכל, powershell זו סביבת תכנות סקריפטים מלאה. לשאלתך:

http://powershell-tips.blogspot.co.il/2011/05/display-top-n-lines-or-last-1n-lines-of.html