ปัญหาตามรูปคับ
จากการทำงานนั้นผมได้รันทดสอบจากเครื่องตัวเองโดยเครื่องผมนั้นมี virtual PC ด้วย และผมก็ใช้ Virtual PC เป็น Server และให้วินโดว์หลักเป็น client เรียกเวบที่ต้องการ ซึ่งมันก็ทำงานได้ปกติ และเมื่อผมสลับกัน คือเอาวินโดว์หลักเป็น Server ส่วน Virtual PC เป็น client ก็ทำงานได้อีกเช่นกัน ผมทดสอบจากทั้ง xp และ vista ก็สามารถทำงานได้ แต่เมื่อเรานำขึ้น Production จริง กลับกลายเป็นว่ามีเพียงวินโดว์ที่ผมใช้สร้างเวบตัวนี้ขึ้นมาเท่านั้น ที่รัน script นี้จาก Production ได้ ส่วนวินโดว์ตัวอื่นๆ ที่เคยทำงานได้กลับแสดงข้อความ error อย่างที่เห็นด้านบน ใครมีข้อเสนอแนะยังไงก็ขอความกรุณาด้วยครับ
ส่วนด้านล่างเป็นคำสั่งที่ผมใช้
function WriteFileToClient(DataValue)
{
//try
//{
var fso = new ActiveXObject("Scripting.FileSystemObject"); //บรรทัดที่ 179 ที่มันแจ้ง
var GUIDName = GUIDGen();
var varFileObject = fso.OpenTextFile("C:\\WINDOWS\\PrintData\\" + GUIDName, 2, true,0); // 2=overwrite, true=create if not exist, 0 = ASCII
var DataSplite = DataValue.split("#");
var DataType;
var tmp = DataSplite[0].split("-");
if(tmp.length > 2)
{
DataType = 0;
}
else
{
DataType = 1;
}
var DataString = "<DataPrint>";
for (i = 0; i < DataSplite.length; i++)
{
DataString += "<TableData>";
DataString += "<DataItem>" + DataSplite[i] + "</DataItem>";
DataString += "<DataType>" + DataType + "</DataType>";
DataString += "</TableData>";
}
DataString += "</DataPrint>";
varFileObject.write(DataString);
varFileObject.close();
//}
//catch(ex)
//{
// alert(ex);
//}
}
function GUIDGen()
{
try
{
var x = new ActiveXObject("Scriptlet.TypeLib");
return (x.GUID);
}
catch (e)
{
return ("error creating GUID");
}
}
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
วิธีแก้มีนิดเดียวคับ แต่ขอเล่าก่อนว่าตอนรันทดสอบนั้นเครื่องทดสอบมันวิ่งบน internet ส่วน production มันเป็น intranet ลืมไปว่ามันคนละอัน ไอ้ตัวผมเองก็ดันไปเซ็ต security ที่ internet เท่านั้นมันเลยทำงานไม่ได้ส่วนการแก้ทำได้ดังนี้
Internet Options --> Security --> Local intranet --> Custom level --> ActiveX controls and plug-ins --> Initialize and script ActiveX controls not marked as safe for scripting --> Prompt
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++