...

View Full Version : php dhtml vbscript problem



gilgalbiblewhee
12-21-2007, 08:33 PM
I have a page of vbscript included by "include file" in a php.
Line 443 shows error:


Parse error: syntax error, unexpected T_STRING in C:\xampp\htdocs\search\cat\cdynlistbox.php on line 443
Line 443 is:

sTemp = sTemp & "<xsl:stylesheet xmlns:xsl=""http://www.w3.org/TR/WD-xsl"">" & vbCrlf

<script language="VBScript" runat="server">
...

Private Function GetXSLStream()
Dim sTemp
sTemp = "<?xml version='1.0'?>" & vbCrlf
sTemp = sTemp & "<xsl:stylesheet xmlns:xsl=""http://www.w3.org/TR/WD-xsl"">" & vbCrlf
sTemp = sTemp & "<xsl:template match=""/"">" & vbCrlf
sTemp = sTemp & "if (!assocArray) var assocArray = new Object();<xsl:for-each select=""root/table1"">" & vbCrlf
sTemp = sTemp & "assocArray[""%listname%=<xsl:value-of select=""@search"" />""] = new Array(" & vbCrlf
sTemp = sTemp & "<xsl:for-each select=""table2"">" & vbCrlf
sTemp = sTemp & "<xsl:value-of select=""table2"" /> ""<xsl:value-of select=""@dvalue"" />"",""<xsl:value-of select=""@display"" />""," & vbCrlf
sTemp = sTemp & "</xsl:for-each> ""EOF"");</xsl:for-each>" & vbCrlf
sTemp = sTemp & "</xsl:template>" & vbCrlf
sTemp = sTemp & "</xsl:stylesheet>" & vbCrlf
GetXSLStream = sTemp
End Function

...
</script>

If you want the full script then check out the attached file zipped and in a txt file.

Mwnciau
12-21-2007, 08:58 PM
<?xml version='1.0'?> is probably causing the problem, the <? and ?> open and close php code. I would recommend turning short_open_tag (http://uk3.php.net/manual/en/ini.core.php#ini.short-open-tag) off in your php.ini

gilgalbiblewhee
12-21-2007, 09:19 PM
Oh Ok thanks.

sTemp = "<" & "?xml version='1.0'?>" & vbCrlf

I split it with " & ". And it worked.



EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum