|
רכיב ASPTear הוא דבר אדיר שמאפשר לנו להריץ קוד ASP שנמצא על שרת אחר, לקבל את הפלט ולעשות איתו מה שבא לנו.
ישנו רכיב נוסף המאפשר פעולה זו ונקרא: AspHTTP אבל הרשיון שלו הוא בשביל מחשב בודד ועולה $49.95, אבל בתור ישראלי השאלה שאני חייב לשאול את עצמי היא: למה לשלם כשאפשר בחינם?
להורדה חינם של של ASPTear לחץ כאן.
בכדי לבצע את פעולת ההורדה בשרת אחר כל מה שאנו צריכים לעשות זה לספק את שם השרת והקובץ אותו אנו רוצים להריץ והמשתנים שישלחו ב-POST או ב-GET במידה ואנו רוצים לשלוח משתנים אל הסקריפט.
להלן דוגמא אשר מריצה את קובץ הסקריפט msft.asp שנמצא ב-www.stockquotes.com ומחזירה לנו את הפלט של הסקריפט, אותו נכתוב למסך בדף שלנו.
AspTear constants
Const Request_POST = 1
Const Request_GET = 2
Set objTear = CreateObject("SOFTWING.ASPtear")
Response.ContentType = "text/html"
On Error Resume Next
Dim strRetval
URL, action, payload, username, password
strRetval = objTear.Retrieve("http://www.stockquotes.com/msft.asp", Request_GET, "", "", "")
If Err.Number <> 0 Then
Response.Write ""
If Err.Number >= 400 Then
Response.Write "Server returned error: " & Err.Number
Else
Response.Write "Component/WinInet error: " & Err.Description
End If
Response.Write ""
Response.End
End If
Response.Write "Microsoft currently selling at " & FormatCurrency(strRetval, 2)
נראה פשוט? זה פשוט!
במידה והסקריפט שלנו אמור לקבל משתנים, כל מה שעלינו לעשות זה להגדיר את צורת השליחה GET / POST ולאחר מכן להגדיר ערך לכל משתנה שאנו שולחי.
לפניכם דוגמא שמריצה את קובץ הסקריפט getquote.asp ב-www.stockquotes.com ושולחת לו ב-GET את משתנה symbol עם ערך MSFT:
AspTear constants
Const Request_POST = 1
Const Request_GET = 2
Set objTear = CreateObject("SOFTWING.ASPtear")
Response.ContentType = "text/html"
On Error Resume Next
Dim strRetval
URL, action, payload, username, password
strRetval = objTear.Retrieve("http://www.stockquotes.com/getquote.asp",Request_GET,"symbol=MSFT","","")
... Error checking code omitted ...
Response.Write "Microsoft currently selling at " & FormatCurrency(strRetval, 2)
אם אתם רוצים לנסות את הרכיב, אל תנסו את דוגמא זו מכיוון שסתם המצאתי אותה ואני לא חושב שבאמת קיים הסקריפט.
רק שתדעו שאתם לא רק מוגבלים להרצת סקריפטים של ASP. ניתן אף לקבל כפלט דף Html רגיל או אף להוריץ סקריפטים של Perl או CGI.
דוגמא טובה לשימוש ברכיב AspTear ניתן לראות במאמר שמראה כיצד ניתן להגדיל את מהירות דפי ה-ASP ע"י הפיכתם לדפי HTML.
לקישור אל המאמר, לחץ כאן
לסיכום, אני מקווה שיש לכם איפב להתקין את הרכיב AspTear ולשחק איתו ולהנות, מכיוון שאפשר להגיע איתו לתוצאות מדהימות. אז בהצלחה.
וספרו לי אם עשיתם איתו משהו מענין ששווה לשמוע או לספר עליו.
|