Когда вы говорите, что слайдер выглядит как маленький элемент, это проблема форматирования? Слайдер все еще работает?
Если слайдер все еще работает, то проблема не столько в скрипте, сколько в CSS, используемом для форматирования внешнего вида слайдера. IE7 немного отличается от IE8 с точки зрения того, как он использует CSS.
То, что я сделал на некоторых из моих сайтов, - это использование определенного CSS для браузера, по одному для каждого основного браузера. Когда пользователь заходит на сайт, я обнаруживаю используемый браузер и затем выбираю правильный CSS для использования в мастере своего сайта.
Что-то похожее на это:
Private Function BrowserStylesheet() As String
Dim message As String = Nothing
Select Case Request.Browser.Browser
Case "IE"
Select Case Request.Browser.MajorVersion
Case 8
message = "<link href=""../../Content/CSS/IE8.css"" rel=""stylesheet"" type=""text/css"" />"
Case 7
message = "<link href=""../../Content/CSS/IE7.css"" rel=""stylesheet"" type=""text/css"" />"
Case 6
message = "<link href=""../../Content/CSS/IE6.css"" rel=""stylesheet"" type=""text/css"" />"
Case Else
message = "<link href=""../../Content/CSS/Unknown.css"" rel=""stylesheet"" type=""text/css"" />"
End Select
Case "Firefox"
message = "<link href=""../../Content/CSS/Mozilla.css"" rel=""stylesheet"" type=""text/css"" />"
Case "AppleMAC-Safari"
'This case will detect Chrome and Safari as the same so we need to distinguish it further.
If Request.UserAgent.Contains("Chrome") Then
message = "<link href=""../../Content/CSS/Chrome.css"" rel=""stylesheet"" type=""text/css"" />"
Else
message = "<link href=""../../Content/CSS/Unknown.css"" rel=""stylesheet"" type=""text/css"" />"
End If
Case Else
message = "<link href=""../../Content/CSS/Unknown.css"" rel=""stylesheet"" type=""text/css"" />"
End Select
Return message
End Function