בן אדם…. איך תעבורה? ?????? האתר שלי בכלל לא באוויר וגם אם מישהו הצליח להיכנס לאי פי וראה משהו אז זה לא אמור להראות לי בעיה שיש לי יותר מדיי משתמשים מחוברים וגם אני רואה כאן הרבה שיש להם בעיה במחשב אפילו הכי קטנה ומפרמטים
תן לי לחלוק עלייך ראשית, אני מקושר לחברת WebPoint אז מן הסתם יש לי ידע במה זה תעבורה ומה זה קונקשנים … לא משנה מה רשום שהרקע, זוהי "שגיאה ידידותית" בלי כל מטרה לתת רקע מלא אודות הבעיה . כאשר ישנו חיבור גדול (תלוי בשרת) של אנשים לשרת שלך באותו זמן , השרת יציג שגיאה למספר דקות/שעות על מנת למנוע מקריסה .
לולאה (?) למשל אם אתה שם קוד של [x] ואתה קורא לקבצים שלך x.gif כאשר x מסמל מספר בין 1 למספר הסמיילים שיש אז פשוט תוכל לעשות לולאה כזאת: For s=1 To 36 str = Replace(str,"["&s&"]","<img src='smilies/"&s&".gif'>") Next
דוגמא Dim smilies(3) smilies(0) = "s1.gif,:)" smilies(1) = "s2.gif,:)" smilies(2) = "s3.gif,:" זה מערך חד-מימדי. אתה צריך לשים ערך קבוע שיפריד בין שם קובץ הסמיילי לבין הקוד שלו (למשל פסיק) ואז בלולאה [for s=0 to UBound(smilies)]להפריד ביניהם בעזרת הפונקציה mid ו-InStr ולקחת כל חלק לבד.
כן בעיקרון זה צריך להיות משהו כזה (די פשוט): For s=0 To UBound(smilies) smilyText = Mid(smilies(s),InStr(smilies(s),",")+1,Len(smilies(s))) smilyImg = Mid(smilies(s),1,(Len(smilies(s))-1)-Len(smilyText)) …… Next
צודק שזה אומר שמחוברים יותר מידי משתמשים אז זה אומר שניגמרה התעבורה הזמנית.. לדוגמא עם מפעילים פורום על שרת IIS ושולחים נגיד הודעה עם קובץ ששוקל יותר מ-200KB אז תיגמר התעבור לשעתיים ועם תיסגור את השרת ותפעיל אותו מחדש זה יעבוד לאחר 5 דקות.. מיניסיון כל הזמן ניגמרת לי התעבורה בגלל שאני מנסה את מה שאני בונה.. אבל אפשר איך שהוא להעלות את התעבורה. אין לי מושג אך..
לא פועל סתכל על הקוד (קצת שיניתי אותו שיתאים לצרכיי) <% Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "Provider=microsoft.jet.oledb.4.0; data source="&Server.mapPath("/my_site.mdb")&";" Set rs = Server.CreateObject("ADODB.Recordset")
עכשיו לבעיות א) זה תמיד מחזיר את אותו השם משתמש ב) למרות שכשאני מדפיס את הSTRSQL יוצאים לי מספרים שונים כלומר ככה:: 1) 1asc SELECT ID,Nick, Rnd(-399*ID) FROM Users 2) 1asc SELECT ID,Nick, Rnd(-502*ID) FROM Users
עכשיו זה טעות אצלי או שהקוד לא טוב….. תודה נועם נ.ב. אני לא שפן ניסיונות אולי ארנב ניסיונות
רק נחוץ מאוד להוסיף שכדי שזה יעבוד ברמת ה-ASP (לא יחזור על אותו סדר כל פעם) עלינו לשלוח לשאילתא את המס' הרנדומלי: Randomize() dim sql sql = "SEECT Employees.EmployeeID FROM Employees ORDER BY Rnd(-1 *"&rnd()&"*Employees.EmployeeID)" rs.Open sql, objConn
Facebook
Twitter
RSS
37 תשובות
ואם אתה פונה לקובץ ספיציפי?
לא משנה…הסתדר
ואיי כבר נבהלתי חשבתי אני צריך עכשיו לפרמט… אין לי כוח
זה הבעיות תעבורה מה אתה נבהל מזה ול
ולמה לפרמט בשביל iis או שמתקינים מחדש או שעושים לו ריסט
בן אדם…. איך תעבורה?
?????? האתר שלי בכלל לא באוויר וגם אם מישהו הצליח להיכנס לאי פי
וראה משהו אז זה לא אמור להראות לי בעיה שיש לי יותר מדיי משתמשים מחוברים
וגם אני רואה כאן הרבה שיש להם בעיה במחשב אפילו הכי קטנה ומפרמטים
זה לא תעבורה …
(מניסיון)
כמופיעה לך שגיאת 403.9 התחברו יותר מדי משתמשים על השרת . (Connections) .
אין זה קשור לתעבורה :]
אפילו כתוב שם שהרגע של השגיאה
זה תעבורה
ואל תגידו לא וזה יכול להיות בגלל שהרבה התחברות אז זה בעיה בתעבורה
אם אתם יודעים מזה בכלל
שאלה
יש לי את הקוד הזה
Function smile(name,smile,Pic)
name = Replace( name , "smile" , "Pic" )
End Function
עכשיו אני יכול להכניס לו ככה?
smile (msg ,
ואם יש לי הרבה מאוד (36) יש דרך לקצר את התהליך ?
תודה מראש
תן לי לחלוק עלייך
ראשית, אני מקושר לחברת WebPoint אז מן הסתם יש לי ידע במה זה תעבורה ומה זה קונקשנים …
לא משנה מה רשום שהרקע, זוהי "שגיאה ידידותית" בלי כל מטרה לתת רקע מלא אודות הבעיה .
כאשר ישנו חיבור גדול (תלוי בשרת) של אנשים לשרת שלך באותו זמן , השרת יציג שגיאה למספר דקות/שעות על מנת למנוע מקריסה .
יופי אז אם אתה מקושר אליהם
תגיד להם שיש להם לקוח לא מרוצה והם לא עונים לו. (והכוונה היא לא אליי)
ניר ..
תגיד שם ושלח לי אימייל,
אני אתן לו מספר ישיר למנהל .
ובקשר לשאלה…..
לולאה (?)
למשל אם אתה שם קוד של [x] ואתה קורא לקבצים שלך x.gif כאשר x מסמל מספר בין 1 למספר הסמיילים שיש אז פשוט תוכל לעשות לולאה כזאת:
For s=1 To 36
str = Replace(str,"["&s&"]","<img src='smilies/"&s&".gif'>")
Next
אוקיי אבל….
אני לא קורא להם לפי מספרים אני קורא להם ככה
נגיד : – < זה s2.gif
תמבין?
שים את הכל במערך ותריץ על הכל לולאה
כן הא… הכי פשוט(ציניות)
אפשר הסבר יותר מפורט או דוגמת קוד — לא קוד מוכן
דוגמא
Dim smilies(3)
smilies(0) = "s1.gif,:)"
smilies(1) = "s2.gif,:)"
smilies(2) = "s3.gif,:"
זה מערך חד-מימדי.
אתה צריך לשים ערך קבוע שיפריד בין שם קובץ הסמיילי לבין הקוד שלו (למשל פסיק)
ואז בלולאה [for s=0 to UBound(smilies)]להפריד ביניהם בעזרת הפונקציה mid ו-InStr ולקחת כל חלק לבד.
אוקיי הבנתי אותך
בעזרת Instr לחפש את ה פסיק ואז הצד השמאלי יהיה הקישור לתמונה
והצד הימני יהיה הקוד שיהיה צריך להחליף….
צודק?
כן
בעיקרון זה צריך להיות משהו כזה (די פשוט):
For s=0 To UBound(smilies)
smilyText = Mid(smilies(s),InStr(smilies(s),",")+1,Len(smilies(s)))
smilyImg = Mid(smilies(s),1,(Len(smilies(s))-1)-Len(smilyText))
……
Next
צודק
שזה אומר שמחוברים יותר מידי משתמשים אז זה אומר שניגמרה התעבורה הזמנית..
לדוגמא עם מפעילים פורום על שרת IIS ושולחים נגיד הודעה עם קובץ ששוקל יותר מ-200KB אז תיגמר התעבור לשעתיים ועם תיסגור את השרת ותפעיל אותו מחדש זה יעבוד לאחר 5 דקות..
מיניסיון
כל הזמן ניגמרת לי התעבורה בגלל שאני מנסה את מה שאני בונה..
אבל אפשר איך שהוא להעלות את התעבורה.
אין לי מושג אך..
מה שאתה מדבר עליו
זה תעבורה , זה לא קשור לתחבורת משתמשים על השרת
ובד"כ אפשר תמיד לטפל בבעיה כזו כשעושים Stop ו Start לשרת …
איך אפשר להעלות תמונות בלי אובייקט?
אפשר עם FSO? או עם
scripting.directory (שגיאת כתיב)
יש על זה מאמר,
אם לא תמצא אותו במדור ה ASP באתר,
תמצא מאמר כזה באתר של אדם – asp.org.il
סבבה +שאלה
איך אני שולף רשומה רנדומלית
ראיתי ב FAQ אבל זה לא התאים לי כי זה מסובך מדיי אני מחפש שורה או 2
תודה
אין דרך.
אז אתה יכול לשפץ לי את הקוד שלך
רק שיהיה פחות מסובך ….. בלי הסינוים וכו' וכו'
תודה רבה רבה
לא מותקן אצלי עדיין אקסס כי פירמטתי ואני לומד לתכנת ולא מתעסק עכשיו עם בניית אתרים ממש.
אז לא יכולתי לבדוק את זה
תגיד אם זה עובד
לא פועל
סתכל על הקוד (קצת שיניתי אותו שיתאים לצרכיי)
<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=microsoft.jet.oledb.4.0; data source="&Server.mapPath("/my_site.mdb")&";"
Set rs = Server.CreateObject("ADODB.Recordset")
Randomize()
intRandomNumber = Int (1000*Rnd)+1
strSQL = "SELECT ID,Nick, Rnd(" & -1 * (intRandomNumber) & "*ID) FROM Users "
rs.open strSql,objconn,3,3
response.write rs("Nick")
response.write("<BR>")
response.write(StrSql)
%>
עכשיו לבעיות
א) זה תמיד מחזיר את אותו השם משתמש
ב) למרות שכשאני מדפיס את הSTRSQL יוצאים לי מספרים שונים
כלומר ככה::
1)
1asc
SELECT ID,Nick, Rnd(-399*ID) FROM Users
2)
1asc
SELECT ID,Nick, Rnd(-502*ID) FROM Users
עכשיו זה טעות אצלי או שהקוד לא טוב…..
תודה נועם
נ.ב.
אני לא שפן ניסיונות אולי ארנב ניסיונות
נסה לתת ל-Rnd איזהשהוא ALIAS ולסדר
על פיו.
במידה וזה לא עובד אז הדרך היחידה זו הדרך של אוריקס.
הא?
דבר איתי בקוד אל תדבר איתי במילים כי אתה לא ממש מובן…..
…
<%
' Initialize ASP RND() function
Randomize()
intRandomNumber = Int (1000*Rnd)+1
' Return 3 random records
strSQL = _
"SELECT TOP 3 TableID, Field1, Rnd(" & -1 * (intRandomNumber) & "*TableID) AS rndField" & _
"FROM Table1 " & _
"ORDER BY rndField"
Set objRS = objConn.Execute(strSQL)
%>
סורי לא פועל….
עדיין מציג כמו אז המספר משתנה
אבל השם משתמש לא…..
השאילתא הבאה נבדקה על המסד לדוגמא Northwind ונמצאה עובדת
-> סידור רנדומלי של רשומות
-> לא חוזר על אותם רצפים
SELECT Employees.EmployeeID
FROM Employees
ORDER BY Rnd(-1 *rnd()*Employees.EmployeeID);
מזל טוב, פיקקתי אותך
רק נחוץ מאוד להוסיף
שכדי שזה יעבוד ברמת ה-ASP (לא יחזור על אותו סדר כל פעם)
עלינו לשלוח לשאילתא את המס' הרנדומלי:
Randomize()
dim sql
sql = "SEECT Employees.EmployeeID FROM Employees ORDER BY Rnd(-1 *"&rnd()&"*Employees.EmployeeID)"
rs.Open sql, objConn
מלך הכותבים לשנת 2004
ARE YOU STILL AWAKE
עודכן –
תגידו זה מתאים לווב אפדייט ??
יצא וינדוס מדיה פלייר 10
אם כן תצרף אורי