Follow These 3 Steps to Retrieving MQL Data Using Classic ASP and MATRIXONE Tool
Step 1: Create object of ServerXMLHTTP 6.0x
dim xmlhttp,urlLogin,PartNO,revision,holdcontent,InitialPoint,FinalPoint,Line
dim arrFinaldata(0)
set xmlhttp = CreateObject("Msxml2.ServerXMLHTTP.6.0")
xmlhttp.setTimeouts 30000, 60000, 60000, 18000
Step 2: Login into MQL System
urlLogin = "http://Mwebcorp123.am.mot-mobility.com:5411/ematrix/servlet/login? login_name=princy&login_password=princy05"
xmlhttp.Open "POST", urlLogin, False
xmlhttp.send ""
Step 3: Write MQL query and get responseText of XMLHTTP
urlECR = "http://Mwebcorp123.am.mot-mobility.com/ematrix/common/emxRunMQL.jsp?mqlCommand=expand bus 'part' """& PartNO &""" """& revision &""" from rel 'Manufacturer Equivalent' select bus to[Manufacturer Equivalent].to.attribute[W18 Part Status].value dump |;"
xmlhttp.Open "POST", urlECR, False
xmlhttp.send ""
holdcontent = xmlhttp.responseText
If InStr(1, holdcontent, "results") > 0 Then
InitialPoint = InStr(1, holdcontent, "results") + 9
FinalPoint = InStr(1, holdcontent, "</textarea>")
Line = Mid(holdcontent, InitialPoint, FinalPoint - InitialPoint)
if len(line)>0 then
'put logic here like split data into array
arrFinaldata = split(Line," ")
end if
end if