Changeset 86
- Timestamp:
- 04/08/08 15:49:06 (2 years ago)
- Location:
- trunk/myasg
- Files:
-
- 1 added
- 5 modified
-
asg-lib/binary.asp (added)
-
config.asp (modified) (1 diff)
-
images/browser.asp (modified) (2 diffs)
-
images/engine.asp (modified) (2 diffs)
-
images/os.asp (modified) (3 diffs)
-
includes/functions_layout.asp (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/myasg/config.asp
r71 r86 52 52 ' Include Datetime functions 53 53 %><!--#include file="asg-lib/datetime.asp" --><% 54 55 ' Include Binary functions 56 ' TODO: consider to include the file only when necessary 57 %><!--#include file="asg-lib/binary.asp" --><% 54 58 55 59 -
trunk/myasg/images/browser.asp
r68 r86 350 350 351 351 352 '* 353 '* Robot 354 '* ----------------- 352 ' *** Robot *** 355 353 356 354 elseif left(lcase(strValue), 5) = "robot" then 357 355 strHex = "47494638396114001400C40000F6F6F6A7A3A3E5E5E5EDECEBC7C7C6B7BABA9999976654508B878552483A7870719DA19CDFDFDE53504ED4D0D02F2A29433B3792938FC0BCBAB7B0ADCFD1CDBDC1BFA59C9AEDEFEFB1B0B1958785725F59E8E8E7F1F1F1DCD6D7D9D8D8FFFFFF21F90400000000002C0000000014001400000574E0278E64699E68AAAE6CEB7E4020BCDCB749132632438A05154946A3F8541488CE4950F82C2090840671684410041363B3301812E0C7E140B8289424CF22FB3134208F86C2E018483C244E4D24301C160B0D13331F84280058140A3D2E16171F017B2D110C6D8C2D157801972F1B2F9FA0A11F21003B" 358 356 359 360 '* 361 '* Debug 362 '* ----------------- 363 364 elseif strValue = "debugicon" then 365 366 ' get debug URI 367 ' get list of icons per page 368 ' check whether list of icons per page has been sent 369 ' send list of icons per page 370 ' unset list of icons per page 371 372 373 '* 374 '* Invalid matching 375 '* ----------------- 376 357 ' *** unknown icon *** 358 377 359 else 378 360 strHex = ASG_STR_ICON_HEX_UNKNOWN_BROWSER 379 ' store values into a temporary cache for debug380 Session("strAsgIconBrowser") = Session("strAsgIconBrowser") & strValue & "|"381 361 382 362 end if … … 386 366 end function 387 367 388 389 '/**390 ' * Prints a binary icon from its Hex representation391 ' *392 ' * @param string strIconHex393 ' * @return void394 ' */395 public function printIconFromHex(strIconHex)396 ' Requirements: only gif images are allowed397 Response.ContentType = "image/gif"398 ' Convert399 for ii = 1 to Len(strIconHex) step 2400 Response.BinaryWrite(ChrB("&h" & Mid(strIconHex, ii, 2)))401 next402 end function403 368 404 369 ' Execute -
trunk/myasg/images/engine.asp
r68 r86 188 188 strHex = "47494638396114001400C40000E9F0E3C4DBAFCFE1C1F4F8F4DBEBD77FAA58E0E4CBFCF3EAE2F8E2A9CA8BA3B769E3EDD8B3CBAE93C96D89AC63708A369BB483BFE9AD75B13A729C34909E6C558D1D77A4496396305990226D9E3D7AA64D62962DFCFDFBFEFEFE6D9E3C679A3421F90400000000002C00000000140014000005D7E0278E6469025CAAAE2C37781FE7585A6DD756966956D16531CB664824661802CCE6F38B6996A68DC600C07C3C1D18E769FA6C2C82EA050BE4582E1FF40653695BA856AC96EBF53402818422202607A10F0908087804046219594E4B1B14070605131A021D04714D5B4B150C070A15171505070B181789739A060B5C52619765671F150204051B17AD7D8A991F1801071015BD0E03A45798B118101C01221E091DA463BB5C17120203010A11080396C7B0B75E81DD060A0D0C437231051EEEEE24F040164D031DF7F8F9FAF71E63EFEF3A32FC13082F04003B" 189 189 190 191 '* 192 '* Debug 193 '* ----------------- 194 195 elseif strValue = "debugicon" then 196 197 ' get debug URI 198 ' get list of icons per page 199 ' check whether list of icons per page has been sent 200 ' send list of icons per page 201 ' unset list of icons per page 202 203 204 '* 205 '* Invalid matching 206 '* ----------------- 207 190 ' *** unknown icon *** 191 208 192 else 209 193 strHex = ASG_STR_ICON_HEX_UNKNOWN_SEARCHENGINE 210 ' store values into a temporary cache for debug211 Session("strAsgIconSearchEngine") = Session("strAsgIconSearchEngine") & strValue & "|"212 194 213 195 end if … … 217 199 end function 218 200 219 220 '/**221 ' * Prints a binary icon from its Hex representation222 ' *223 ' * @param string strIconHex224 ' * @return void225 ' */226 public function printIconFromHex(strIconHex)227 ' Requirements: only gif images are allowed228 Response.ContentType = "image/gif"229 ' Convert230 for ii = 1 to Len(strIconHex) step 2231 Response.BinaryWrite(ChrB("&h" & Mid(strIconHex, ii, 2)))232 next233 end function234 201 235 202 ' Execute -
trunk/myasg/images/os.asp
r68 r86 308 308 309 309 310 '* 311 '* Unix 312 '* 313 '* @todo 314 '* ----------------- 310 ' *** Unix *** 311 312 ' TODO: missing content. 315 313 316 314 elseif strValue = "unix" then … … 318 316 319 317 320 '* 321 '* Robot 322 '* ----------------- 323 318 ' *** Robot *** 319 324 320 elseif strValue = "robot" then 325 321 strHex = "47494638396114001400C40000F6F6F6A7A3A3E5E5E5EDECEBC7C7C6B7BABA9999976654508B878552483A7870719DA19CDFDFDE53504ED4D0D02F2A29433B3792938FC0BCBAB7B0ADCFD1CDBDC1BFA59C9AEDEFEFB1B0B1958785725F59E8E8E7F1F1F1DCD6D7D9D8D8FFFFFF21F90400000000002C0000000014001400000574E0278E64699E68AAAE6CEB7E4020BCDCB749132632438A05154946A3F8541488CE4950F82C2090840671684410041363B3301812E0C7E140B8289424CF22FB3134208F86C2E018483C244E4D24301C160B0D13331F84280058140A3D2E16171F017B2D110C6D8C2D157801972F1B2F9FA0A11F21003B" 326 322 327 323 328 '* 329 '* Debug 330 '* ----------------- 331 332 elseif strValue = "debugicon" then 333 334 ' get debug URI 335 ' get list of icons per page 336 ' check whether list of icons per page has been sent 337 ' send list of icons per page 338 ' unset list of icons per page 339 340 341 '* 342 '* Invalid matching 343 '* ----------------- 324 ' *** unknown icon *** 344 325 345 326 else 346 327 strHex = ASG_STR_ICON_HEX_UNKNOWN_OS 347 ' store values into a temporary cache for debug 348 Session("strAsgIconOs") = Session("strAsgIconOs") & strValue & "|" 349 328 350 329 end if 351 330 … … 354 333 end function 355 334 356 357 '/**358 ' * Prints a binary icon from its Hex representation359 ' *360 ' * @param string strIconHex361 ' * @return void362 ' */363 public function printIconFromHex(strIconHex)364 ' Requirements: only gif images are allowed365 Response.ContentType = "image/gif"366 ' Convert367 for ii = 1 to Len(strIconHex) step 2368 Response.BinaryWrite(ChrB("&h" & Mid(strIconHex, ii, 2)))369 next370 end function371 335 372 336 ' Execute -
trunk/myasg/includes/functions_layout.asp
r68 r86 72 72 73 73 end function 74 75 74 76 '-----------------------------------------------------------------------------------------77 ' Costruisci Riga Tabella Contenuti - Debug automatico icone non riconosciute78 '-----------------------------------------------------------------------------------------79 ' Funzione:80 ' Data: 14.03.2004 |81 ' Commenti:82 '-----------------------------------------------------------------------------------------83 function BuildTableContCheckIcon(ByVal colspanValue, ByVal iconType, ByVal pageNum)84 85 Dim strAsgTableContent86 strAsgTableContent = ""87 88 strAsgTableContent = strAsgTableContent & vbCrLf & "<!-- Informazioni icone non riconosciute -->"89 strAsgTableContent = strAsgTableContent & vbCrLf & "<tr class=""smalltext"" align=""center"" valign=""top"">"90 strAsgTableContent = strAsgTableContent & vbCrLf & " <td width=""100%"" colspan=""" & colspanValue & """><br /><img src=""" & strAsgSknPathImage & iconType & ".asp?icon=checkicon&page=" & pageNum & """ alt="""" /><br /></td>"91 strAsgTableContent = strAsgTableContent & vbCrLf & "</tr>"92 strAsgTableContent = strAsgTableContent & vbCrLf & "<!-- Informazioni icone non riconosciute -->"93 94 95 If iconType = "browser" AND Session("blnAsgIconBrowser" & pageNum) <> "notified" AND blnAsgCheckIcon Then96 97 Response.Write(strAsgTableContent)98 99 ElseIf iconType = "os" AND Session("blnAsgIconOs" & pageNum) <> "notified" AND blnAsgCheckIcon Then100 101 Response.Write(strAsgTableContent)102 103 ElseIf iconType = "engine" AND Session("blnAsgIconEngine" & pageNum) <> "notified" AND blnAsgCheckIcon Then104 105 Response.Write(strAsgTableContent)106 107 End If108 109 end function110 111 75 112 76 '----------------------------------------------------------------------------------------- … … 124 88 125 89 end function 126 90 127 91 128 92 '----------------------------------------------------------------------------------------- … … 140 104 141 105 end function 142 106 143 107 144 108 %>
![(please configure the [header_logo] section in trac.ini)](http://www.asp-stats.com/images/asg-logo.png)