<!DOCTYPE con VB 5

[mred]

c'è qualcuno che puo' aiutarmi a scrivere con vb5 o altra versione il tag <!DOCTYPE
grazie

[zello]

VB non è il mio linguaggio, quindi magari ci sono forme più eleganti. Comunque:
- includi un riferimento a Microsoft XML (qualsiasi versione).
- scrivi qualcosa del tipo

Codice: Seleziona tutto

Dim s As New MSXML2.DOMDocument
Dim root As MSXML2.IXMLDOMElement
Set root = s.createElement("RootTag")
Set s.documentElement = root
Dim instruct As MSXML2.IXMLDOMProcessingInstruction
Set instruct = s.createProcessingInstruction("DOCTYPE", "data")
root.appendChild instruct
s.Save ("c:\temp\tmp.xml")


Otterrai qualcosa del tipo

Codice: Seleziona tutto

C:\TEMP>type tmp.xml
<RootTag>
<?DOCTYPE data?>
</RootTag>


Può andare?

[mred]

ti ringrazio ma così non funziona perchè l'istruzione createProcessingInstruction crea un tag <?DOCTYPE e non <!DOCTYPE

[zello]

e hai ragione, ovviamente.
Il DOM (già nella sua standardizzazione del W3C, in questo caso la povera Microsoft non c'entra) non prevede che si possa modificare il DTD, e quindi la proprietà che lo espone è in sola lettura (documentType, mi sembra di ricordare).
L'unica cosa che puoi fare è caricare - via Document.loadXML (stringaXML) - un documento che già contenga il DTD (tipo document.loadXML "<?xml version=""1.0""?><!DOCTYPE....> <root/>" ).

[mred]

ed infatti ho fatto cosi' ... grazie