Join us in Outworldz at www.outworldz.com:9000 or follow us:

Search dozens of selected web sites for OpenSim and LSL script

New! Script Meta-Search will search thousands of scripts here and at other sites for LSL or Opensim scripts.
Loading

Want to add a script or a project? Upload it and a half million people will see it and your name here this year.

Home   Show All
Category: Contributor: Creator
Cache View_Your_Second_Life_Cache  

View_Your_Second_Life_Cache

The VB Script - runs from the command prompt

Category: Cache
By : Ferd Frederix
Created: 2010-11-04 Edited: 2010-11-04
Worlds: Second Life

the Zip file

Download all files for View_Your_Second_Life_Cache
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. View_Your_Second_Life_Cache_1.lsl
Get file # 2. View_Your_Second_Life_Cache_2.lsl

This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1
2 ' run this with the following command in windows boxes:
3 ' cscript show.vbs
4 ' browse to the cache texture folder for
5 ' Vista : C:\Users\YOURNAME\AppData\Local\SecondLife\texturecache
6 ' XP: C:\Documents and Settings\fred\Local Settings\Application Data\SecondLife\texturecache
7
8 ' open the resulting file FileList0.htm with a web browser to view your cache and the UUID
9 ' each folder will be made into a separate web page with a Next button to view them
10
11 option Explicit ' all vars must be declared
12 Dim fso, folder, files, NewsFile,sFolder, subfolder,subfiles, path, counter,sCount,folderIdx,fName,NewFile,subfolderIdx,spos,epos,Name
13
14 sFolder = BrowseFolder( "C:\", True )
15
16 Set fso = CreateObject("Scripting.FileSystemObject")
17
18 counter = 0
19 Set folder = fso.GetFolder(sFolder)
20 Set files = folder.SubFolders
21 For each folderIdx In files
22 path = sFolder & "\" & folderIdx.Name
23 fName = "FileList" & counter & ".htm"
24
25 Set NewFile = fso.CreateTextFile(fName, True)
26
27 Set subfolder = fso.GetFolder(path)
28 Set subfiles = subfolder.Files
29 For each subfolderIdx in subfiles
30 name = subfolderIdx.Name
31 name= Replace(name,".texture","")
32 NewFile.WriteLine("<img src='http://secondlife.com/app/image/" + name + "/2'><br><p> " & name & " </p>" )
33 Next
34 counter = counter + 1
35 NewFile.WriteLine("<p><a href='FileList" & counter & ".htm'>Next Page</a></p>")
36 NewFile.Close
37 Next
38 Wscript.Echo "Open 'FileList0.htm' in a web browser to view your cache"
39
40 Function BrowseFolder( myStartLocation, blnSimpleDialog )
41 ' This function generates a Browse Folder dialog
42 Const MY_COMPUTER = &H11&
43 Const WINDOW_HANDLE = 0 ' Must ALWAYS be 0
44
45 Dim numOptions, objFolder, objFolderItem
46 Dim objPath, objShell, strPath, strPrompt
47
48 ' Set the options for the dialog window
49 strPrompt = "Select a folder:"
50 If blnSimpleDialog = True Then
51 numOptions = 0 ' Simple dialog
52 Else
53 numOptions = &H10& ' Additional text field to type folder path
54 End If
55
56 ' Create a Windows Shell object
57 Set objShell = CreateObject( "Shell.Application" )
58
59 ' If specified, convert "My Computer" to a valid
60 ' path for the Windows Shell's BrowseFolder method
61 If UCase( myStartLocation ) = "MY COMPUTER" Then
62 Set objFolder = objShell.Namespace( MY_COMPUTER )
63 Set objFolderItem = objFolder.Self
64 strPath = objFolderItem.Path
65 Else
66 strPath = myStartLocation
67 End If
68
69 Set objFolder = objShell.BrowseForFolder( WINDOW_HANDLE, strPrompt, _
70 numOptions, strPath )
71
72 ' Quit if no folder was selected
73 If objFolder Is Nothing Then
74 BrowseFolder = ""
75 Exit Function
76 End If
77
78 ' Retrieve the path of the selected folder
79 Set objFolderItem = objFolder.Self
80 objPath = objFolderItem.Path
81
82 ' Return the path of the selected folder
83 BrowseFolder = objPath
84 End Function

View_Your_Second_Life_Cache

A program to put textures onto prims using the UUID's from the above script. Put the UUID into the Description and rez the object

Category: Cache
By : Ferd Frederix
Created: 2010-11-04 Edited: 2010-11-04
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
6 }
7 touch_start(integer total_number)
8 {
10 }
11 }

Back to the Best Free Tools in Second Life and OpenSim.