Jag försöker att få detta att fungera i asp.net istället för traditionell asp. Någon som har en aning hur man skriver detta i .net..
? har försökt en hel del nu.. men :(
<script language="VB" runat="server">
Set XMLDoc = CreateObject("MSXML2.DOMDocument")
XMLDoc.setProperty "ServerHTTPRequest", true
XMLDoc.async=false
XMLDoc.Load "temp/data2.asp"
If XMLDoc.parseError.errorCode = 0 Then
Set nodeLst = XMLDoc.getElementsByTagName("item")
For i = 0 To 3
Set title = XMLDoc.getElementsByTagName("Sport")
Set desc = XMLDoc.getElementsByTagName("starttid")
Set link = XMLDoc.getElementsByTagName("Sluttid")
response.write Sport.Item(i).text & "<br>" & Starttid.Item(i).text & "<br>"
response.write Sluttid.Item(i-1).text
next
else
Response.write XMLDoc.parseError.reason
End If
</script>
Det var slutresultatet jag ville veta hur det skall se ut. Gissning: Du vill kolla om det finns data för ett visst datum i en kalender och om det finns så skall det läggas till en länk i cellen för datumet, eller?
Lägg gärna upp en bild på hur du vill att det skall se ut.
Jo precis, de ska skrivas ut en länk, den texten som jag klistrade in och kalendern ser ut som bifogade bilden, har inga länkar där nu dock.. men det fungerar om ja hårdkodar in den texten ovan..
Något åt detta hållet? Det borde inte vara några problem för dig att översätta detta till vb
private void Page_Load(object sender, System.EventArgs e)
{
ds = new DataSet();
// Läs in Xmlfilen i ett dataset
ds.ReadXml(Server.MapPath("XMLFile1.xml"));
}
private void Calendar1_DayRender(object sender, DayRenderEventArgs e)
{
DataRow[] arrDatum = ds.Tables[0].Select("Datum = '"+e.Day.Date.ToShortDateString()+"'"); //välj rader med det datum som renderas
foreach(DataRow dr in arrDatum)
{
//Gör någonting...
e.Cell.Controls.Add(new LiteralControl("<br>"+(string)dr["Sport"]));
}
if(arrDatum.Length >0)
{
//Gör någonting annat
}
}
/Andreas
247 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2