אז ככה...יש לי VB סקריפט שאני מנסה לשים בדף HTML

קוד:

<input type=text id=target style="width:0%">
<input type=text id=referer style="width:0%">
<script type="text/javascript">
<!--
target.value = "whatevertarget"
referer.value = "whatever"
//-->
</script>
<script language=vbs for=butt > 
dim ie 
set ie=createobject("InternetExplorer.Application") 
ie.visible=true 
dim ref 
if not left(lcase(referer.value), 8) = "referer:" then ref = "referer: " 
ie.navigate target.value, , , , ref & referer.value 
</script>

עכשיו....הקוד פועל בוודאות אך אני לא מבין למה internet explorer לא מאשר את הסקריפט...כאשר אני נכנס לדף עם הסקריפט כל מה שאנ רוה זה דף ריק...
אך כאשר אני מכניס את האתר שלי לאתרים מהימנים (כלים->אבטחה->אתרים מהימנים)
הסקריפט עובד כמו שצריך....האם אתם יודעים איך אני יכול לתת הרשאה אוטומטית או איזו שהיא אפשרות לעקוף את זה?
אני לא חושב שכל לקוח שלי ירצה לעשות את התהליך הזה (כלים->אבטחה->אתרים מהימנים) ואני לא חושב שכל אחד יסתדר עם הפעלות האלה...למישהו יש עצה?
תודה מראש!

בס"ד

אתה מייצר אובייקט לכן יש את האבטחה הזאת
אם אתה לא יכול להסתדר בלי האובייקט הזה - אין מה לעשות

האם יש תחליף ליצירת האובייקט?
האם יש אפשרות ליצור שבמקום זה יהיה חלון שישאל את הלקוח אם הוא רוצה להריץ את הסקריפט הזה?
בבקשה תאמר לי אם אני יכול לעשות סקריפט אחר שאני יקבל את אותה תוצאה?

מ....אוקיי החלפתי את הפקודה
createobject
במה שרשמת והוא נותן שגיאה שנדרש אובייקט ושהובייקט אינו תומך בפעולה זו...
יש לי למישהו רעיון?

נראה לי שלא הבנת את כוונתו ושלא השתמש בזה כמו שצריך.

1. מה אתה בעצם רוצה לעשות ?
2. תציג את הקוד כשאתה שואל על בעיה שקשורה בקוד (אמנם הצגת בתחילה אך שנית אותו ואנחנו לא יכולים לדעת מה לא עשית כמו שצריך).

להערכתי הבעיה היא שהחלפת רק את השורה של יצירת האובייקט ולכן היות ובהמשך אתה מנסה לטפל במשתנה ש"אמור" להיות אובייקט אתה מקבל הודעה שנדרש אובייקט.
הטעות שלך היא שלא מחקת את כל הקשור לאובייקט, פשוט תשכח מהאובייקט, הוא לא קיים ! (למרות שמיקרוסופט חושבים שכן...).

סליחה...אתה צודק...הנה הסקריפט וכפי שרואים שיניתי רק את ה-

קוד:

 

<input type=text id=target style="width:0%">
<input type=text id=referer style="width:0%">
<script type="text/javascript">
<!--
target.value = "whatevertarget"
referer.value = "whatever"
//-->
</script>
<script language=vbs for=butt > 
dim ie 
set ie=window.loaction("InternetExplorer.Application") 
ie.visible=true 
dim ref 
if not left(lcase(referer.value), 8) = "referer:" then ref = "referer: " 
ie.navigate target.value, , , , ref & referer.value 
</script>

אחי..אני ממש בקושי מבין בVBS תוכל לעזור לי פה? את איזו שורות אני צריך למחוק? איזו שורות קשורות לאווביקט? (מה שאתם רואים למעלה זה כל הסקיפרט...אין עוד פעולות...

אתם האתר היחיד שבאמת עזר לי! תודה רבה!! כל האתרים האחרים אפילו לא רשמו תגובה...

אני מרגיש שאנחנו אוטוטו מצליחים את זה....אז בבקשה רק נסיון קטן...
תודה!

ספר לנו מה אתה רוצה לעשות ?

אוקי...
אני רוצה להכין סקריפט שמקשר לאתר א'
מאתר פ'
והסקריפט בעצם יגרום לאתר א' לחשוב שבאתי בכלל מאתרב'

זה נקרא רפרנסרים... refer
הסקריפט עצמו עובד מצויין
אך יש את בעיית האבטחה...
אז אני שואל האם יש דרך לגרום לסקריפט הזה לעבוד בלי ליצור אובייקט?
ואם כן אז איך...כי אני ממש חדש בעסקי ה VB

ואם לא...אז אולי מישהו יוכל לתת לי סקריפט כזה בJAVA?

אני חושב, שמסיבות אבטחה, אתה לא יכול לעשות את זה.

תוכל אולי לעשות זאת באמעצות שפת תסריט בצד השרת או באמצעות XUL בדפדפני מוזילה בלבד.
אני לא מכיר תסריט (script) שעושה את זה, וכמו שנאמר שוב ושוב, מסיבות מובנות ביותר זה לא ממש אפשרי.

בס"ד

נראה לי שאפשר לעשות בAJAX
רק צריך לדעת איזה כותר לשנות

זו בעיה בפני עצמה...אני בקושי יודע מה כל פעולה עושה בסקריפט הקטן הזה...

לומדים