24. april 2004 - 00:31Der er
17 kommentarer og 1 løsning
Random image problem
Hejsa ekspertere
hvad er der galt med denne kode?
Dim path = "C:\inetpub\wwwroot\images\" Dim dir As New DirectoryInfo(path) Dim files As FileInfo() = dir.GetFiles("*.jpg") Dim random As New Random Dim ranNum = random.Next(0, UBound(files) + 1) Image1.ImageUrl = (" & path & files(ranNum).Name & ")
Koden virker ikke og giver denne error:
Compilation Error Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately.
Jeg har denne her kode som virker FINT men nu vil jeg bare bruge IMAGE.
Dim path = "C:\inetpub\wwwroot\images\" Dim dir As New DirectoryInfo(path) Dim files As FileInfo() = dir.GetFiles("*.jpg") Dim random As New Random Dim ranNum = random.Next(0, UBound(files)+1) response.Write("<img Height=""218px"" Width=""238px"" src='" & path & files(ranNum).Name & "'>")
Denne her er ikke så meget problemet men jeg kunne ønske mig at bruge en ASP.NET image.
Dim path = "C:\inetpub\wwwroot\images\" Dim dir As New DirectoryInfo(path) Dim files As FileInfo() = dir.GetFiles("*.jpg") Dim random As New Random Dim ranNum = random.Next(0, UBound(files) + 1) Image1.Attributes.Add("src",path & files(ranNum).Name)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.