[IgalSt]

כן, מפרט משגע. רק חבל שהוא הגיע עם פיקסל שרוף ו-IBM מסרבים בתוקף להחליף מסך. זה המחשב השני שאני פותח חדש מהאריזה (הקודם היה שרוט).
אבל פריט לכך אני מאוד מרוצה ממנו: קל מאוד, ביצועים מעולים ואפשר לצאת בלי בעיה ליום שלם לעבוד בחוץ בלי להסתובב עם מטען.

לענייננו, הקוד עם TIMEOUT.
אני מוציא את זה מקוד קיים, אני מאמין שתבין מה הולך שם. הוא דיי מסודר.

function pmyAccessWebService(PostData)
Dim xmlHttp, TimeStart, Timeout, Result, ResultCode
	TimeStart = Now()
	Timeout=False
	On error resume next
	'~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~
	Set xmlHttp = Server.CreateObject("Msxml2.ServerXMLHTTP.4.0")
	With xmlHttp
		.open "POST", pmyWebServiceUrl, false
		.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
		.send(PostData)
         Do 
			If (CInt(DateDiff("s", TimeStart, Now()))>pmyTimeout) Then 
				Timeout=True
			    .abort 
			    Exit Do
			End If 
        Loop While (.readyState<>4)
        if .readyState=4 then Result = .responseText
	End With
	'~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~
	Set xmlHttp = Nothing
	If Err.number<>0 or Timeout then
		Response.Write "Error: "
		if Timeout then Response.Write "Timeout"
		if Err.number<>0 then Response.Write Err.number & " - " & Err.Description
	end if
	'~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~
	ResultCode = pmyFind(Result, "<ResultCode>", "</ResultCode>")
	'Call pmyEmailLog(PostData,Result)
	'~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~  ~
pmyAccessWebService = ResultCode
End function

באשר לחיבור של PHP ו-MYSQL שהוא יותר טוב (מבחינת ביצועים)? אני לא יכול להסכים איתך.
אומנם ל-MYSQL טבעי יותר לעבוד על לינוקס ולא על WIN, אבל האפליקציה שפונה אליו יכולה לשבת על כל מערכת הפעלה ולהכתב בכל שפה. זה לא משפיע לדעתי. אם עובדים נכון עם השפה אז הכל בסדר.
מה גם שאתה יודע ASP ברמה גבוהה כבר, ותייצר קוד יותר טוב ויותר יעיל ככל הנראה מ-PHP.