diff options
| author | Michael Stahl <mstahl@redhat.com> | 2012-01-28 20:53:50 +0100 |
|---|---|---|
| committer | Michael Stahl <mstahl@redhat.com> | 2012-01-28 20:53:50 +0100 |
| commit | 0e1042f42101dd2a7407a38d204de6f4de28890a (patch) | |
| tree | 9e9f67205cd5b72f1031721273e1534a3a1e5b0f /sd/res/webview/savepic.asp | |
| parent | 8377f5594498d5378d67c8a3e06b5e14b0051fb4 (diff) | |
replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster
Diffstat (limited to 'sd/res/webview/savepic.asp')
| -rw-r--r-- | sd/res/webview/savepic.asp | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/sd/res/webview/savepic.asp b/sd/res/webview/savepic.asp deleted file mode 100644 index 71adefc4f..000000000 --- a/sd/res/webview/savepic.asp +++ /dev/null @@ -1,39 +0,0 @@ -<% - Option Explicit - Response.Expires = 0 - Response.Buffer = True -%> - -<!-- #include file = "common.inc" --> - -<% - ' get new picture - Dim sCurrPic,aPictureArray, nUpper, nCurrPic - - aPictureArray = File_getDataVirtual( csFilePicture, ".", ";" ) - nUpper = CInt( (UBound(aPictureArray) - 1 ) / 2) - - sCurrPic = Request( "CurrPic" ) - - ' check if + or - was pressed - select case Request( "Auswahl" ) - case "+" - if isNumeric( sCurrPic ) then - sCurrPic = CStr( CLng( sCurrPic ) + 1 ) - end if - case "-" - if isNumeric( sCurrPic ) then - sCurrPic = CStr( CLng( sCurrPic ) - 1 ) - end if - end select - - ' save picture name - if isNumeric( sCurrPic ) then - if (CInt( sCurrPic ) > 0) and ( CInt( sCurrPic ) <= nUpper ) then - call File_writeVirtual( "currpic.txt", ".", sCurrPic ) - end if - end if - - ' return to edit page - Response.Redirect( "./editpic.asp" ) -%> |