diff options
Diffstat (limited to 'sd/res/webview/editpic.asp')
| -rw-r--r-- | sd/res/webview/editpic.asp | 58 |
1 files changed, 0 insertions, 58 deletions
diff --git a/sd/res/webview/editpic.asp b/sd/res/webview/editpic.asp deleted file mode 100644 index 34a4a51e4..000000000 --- a/sd/res/webview/editpic.asp +++ /dev/null @@ -1,58 +0,0 @@ -<% - Option Explicit - Response.Expires = 0 - Response.Buffer = True -%> - -<!-- #include file = "common.inc" --> - - -<% - Dim aPictureArray, nPic, nUpper - - aPictureArray = File_getDataVirtual( csFilePicture, ".", ";" ) - nPic = File_readVirtual( "currpic.txt", "." ) - nUpper = CInt( (UBound(aPictureArray) - 1 ) / 2) -%> - -<HTML> -<HEAD> -</HEAD> -<BODY> - <FORM action="savepic.asp" method=get> - <% - if isNumeric(nPic) then - if (CInt( nPic ) >= CInt( (UBound(aPictureArray ) - 1 ) / 2 )) then - nPic = nUpper - end if - else - nPic = nUpper - end if - - - if CInt( nPic ) > 1 then - %> - <INPUT type=submit name="Auswahl" value="-"></INPUT> - <% - else - %> - <INPUT type=button value=" "></INPUT> - <% - end if - %> - <INPUT type=text name="CurrPic" value="<% = nPic %>" SIZE=3></INPUT> - <% - if CInt( nPic ) < CInt( nUpper ) then - %> - <INPUT type=submit name="Auswahl" value="+"></INPUT> - <% - else - %> - <INPUT type=button value=" "></INPUT> - <% - end if - %> - <INPUT type=submit name="Auswahl" value="$$2"></INPUT> - </FORM> -</BODY> -</HTML> |