i hve data in SQL dB , when the data is written frm SQL to XML i need it to get validated using a given XSD file currently i am just able to write frm SQL to XML with no validation but i need to use the given XSD file
Printable View
i hve data in SQL dB , when the data is written frm SQL to XML i need it to get validated using a given XSD file currently i am just able to write frm SQL to XML with no validation but i need to use the given XSD file
Quote:
Originally Posted by svibuk
msxml6.dll: The filename, directory name, or volume label syntax is incorrect.
when i use the validation given in the script
'Validate the data file prior to bulkload
Dim sOutput
sOutput = ValidateFile("c:\test\SampleXMLData.xml", "", "c:\test\SampleSchema.xml")
WScript.Echo sOutput
'If FileValid Then
' Check constraints and initiate transaction (if needed)
' objBL.CheckConstraints = True
' objBL.Transaction=True
'Execute XML bulkload using file.
objBL.Execute "c:\test\SampleSchema.xml", "c:\test\SampleXMLData.xml"
set objBL=Nothing
'End If
Function ValidateFile(strXmlFile,strUrn,strXsdFile)
' Create a schema cache and add SampleSchema.xml to it.
Dim xs, fso, sAppPath
Set fso = CreateObject("Scripting.FileSystemObject")
Set xs = CreateObject("MSXML2.XMLSchemaCache.6.0")
sAppPath = fso.GetFolder(".")
xs.Add strUrn, sAppPath & "\" & strXsdFile
' Create an XML DOMDocument object.
Dim xd
Set xd = CreateObject("MSXML2.DOMDocument.6.0")
' Assign the schema cache to the DOM document.
' schemas collection.
Set xd.schemas = xs
' Load XML document as DOM document.
xd.async = False
xd.Load sAppPath & "\" & strXmlFile
' Return validation results in message to the user.
If xd.parseError.errorCode <> 0 Then
ValidateFile = "Validation failed on " & _
strXmlFile & vbCrLf & _
"=====================" & vbCrLf & _
"Reason: " & xd.parseError.reason & _
vbCrLf & "Source: " & _
xd.parseError.srcText & _
vbCrLf & "Line: " & _
xd.parseError.Line & vbCrLf
FileValid = False
Else
ValidateFile = "Validation succeeded for " & _
strXmlFile & vbCrLf & _
"======================" & _
vbCrLf & "Contents to be bulkloaded" & vbCrLf
FileValid = True
End If
End Function
i get the above error , morover i need to transfer data from SQL to XML with the tag elements specified in the schema file ie XSD file
The new open source tools in CAM Editor provide SQL to XML drag and drop mapping with automatic generation of XML instances with SQL data values injected.
There is an introductory video that shows you the concepts and demonstration of building an actual working example.
You can download, install and test the worked example from the video tutorial from the CAMeditor.org web site.
The open data engine does all the hard work - reading the SQL tables - getting data and then generating the XML - using code-free declarative methods. Then you can use the CAMV validation engine to validate the results.
Enjoy.
