31 Dec 2018: Thank you to our knowledgeable and friendly forums users for another great year. We are aware of the uptick in spam accounts and are doing our best to ban these at first sight. Thank you for your patience!

csv notes extraction

Hi,

I'm using this vbs script to automatically download the notes in a csv file. It works well except when there is a special character in one of the notes. In that case, the csv is created but there are no notes in it.

Downloading manually the notes still works.
If a note contains a special character, it is displayed normaly in OpenClinica and also in the database.
To make the script work again, I have to update the corresponding note directly in the database.

So it is really about the script. Could you tell me what I should change to make it works with any characters ?


Set objFSO=CreateObject("Scripting.FileSystemObject")
outFile="...\notes.csv"
Set objFile = objFSO.CreateTextFile(outFile,True)
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
strURLStart = "https://.../OpenClinica/"
strURL = strURLStart & "j_spring_security_check?j_username=XXX"
strURL = strURL & "&j_password=XXX"
objHTTP.Open "POST", strURL, False
objHTTP.send
strURL = strURLStart & "DiscrepancyNoteOutputServlet?fmt=csv&studyIdentifier=XXX&discNoteType=-1&fileName=dnotes0_XXX&discrepancyNoteBean.disType=Query"
objHTTP.Open "GET", strURL, False
objHTTP.send
objFile.Write objHTTP.responseText
objFile.Close





Comments

Sign In or Register to comment.