🚀 go-pugleaf

Hi Gambit.

Thanks, here is the EXTRACT of my code that's generating error

void CheckReply()
{
        tagVARIANT Opt,Ui;
        int AttCnt;long Status;
        WideString Cmd(String("SaveAs"));
        WideString Domain,CharSet;
        IHTMLDocument2 *HTMLDocument = NULL;
        TXMLDocument *XmlDoc;
        bool Success;

        Status=MyBrowser->Document->QueryInterface(IID_IHTMLDocument2,(LPVOID*)&HTMLDocument);
        if(Status!=0){ShowMessage("Could Not Read Response");return;}

        HTMLDocument->get_domain(&Domain);
        if(Domain==SetDom) //if the page loaded is from the domain predefined as SetDom
        {
                StatusPanel->Lines->Add(Domain); 		//Just for visual confirmation
                StatusPanel->Lines->Add("Remote Service");

                Opt.vt=VT_BSTR; Opt.bstrVal=WideString(SName); //SName is the generated file name with .txt extension 
                VARIANT_BOOL UI=VARIANT_FALSE;
                 VARIANT_BOOL __RPC_FAR RetVal;

	//Saving the file 
                Status=HTMLDocument->execCommand(Cmd,UI,Opt,&RetVal); //I am having problem with this call also since it is not avoiding the save as dialogue box which I wish to

	//creating TXMLDocument object dynamically out here.	

                XmlDoc=new TXMLDocument(TName);
	//TName is the string variable holding the path and file name of xml file to be loaded.
                XmlDoc->Options<<doNodeAutoCreate;
                XmlDoc->Options<<doAttrNull;
                XmlDoc->Options<<doAutoPrefix;
                XmlDoc->Options<<doNamespaceDecl;
                XmlDoc->NodeIndentStr="  ";

                //XmlDoc->DOMVendor=
                //XmlDoc->LoadFromFile(TName);

                XmlDoc->Active=true;
                
	   ShowMessage(XmlDoc->XML->GetText());
	//this message box successfully shows the contents of xml file loaded this suggest that the XmlDoc is not null
	//however this next statement to retrieve the tagname generates the access violation.


                TagName=XmlDoc->DocumentElement->GetNodeName();

                if(TagName==WideString("Reply")) {
                        StatusPanel->Lines->Add(TagName);
                        StatusPanel->Lines->Add("Reading Reply"); }
                else {
                        StatusPanel->Lines->Add("Error");
                        StatusPanel->Lines->Add("Invalid Reply");
                        return; }
}


Please check out whether it gives any insight to my problem and revert back.
Thank you again.