File information
Created by
kleinschraderUploaded by
kleinschraderVirus scan
Some manually verified files
Its an super simple, easy to use savegamemanager
It just renames the "Saves" folder.
!!!DO NOT CLOSE THE PROGRAMM JUST PRESS DONE AND IT WILL CLOSE IT SELF!!!
Heres the sourcecode if you are interested:
written in Visual Basic
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim Path As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\My Games\Skyrim"
Try
My.Computer.FileSystem.CurrentDirectory = Path
Catch ex As Exception
MsgBox("Skyrim saves not found!")
Application.Exit()
End Try
If Not My.Computer.FileSystem.DirectoryExists("1") Then
Try
Rename("Saves", "1")
Catch ex As Exception
My.Computer.FileSystem.CreateDirectory("1")
End Try
End If
If Not My.Computer.FileSystem.DirectoryExists("2") Then
Try
Rename("Saves", "2")
Catch ex As Exception
My.Computer.FileSystem.CreateDirectory("2")
End Try
End If
If Not My.Computer.FileSystem.DirectoryExists("3") Then
Try
Rename("Saves", "3")
Catch ex As Exception
My.Computer.FileSystem.CreateDirectory("3")
End Try
End If
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked Then
Rename("1", "Saves")
End If
If RadioButton2.Checked Then
Rename("2", "Saves")
End If
If RadioButton3.Checked Then
Rename("3", "Saves")
End If
Application.Exit()
End Sub
End Class
It just renames the "Saves" folder.
!!!DO NOT CLOSE THE PROGRAMM JUST PRESS DONE AND IT WILL CLOSE IT SELF!!!
Heres the sourcecode if you are interested:
written in Visual Basic
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim Path As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & "\My Games\Skyrim"
Try
My.Computer.FileSystem.CurrentDirectory = Path
Catch ex As Exception
MsgBox("Skyrim saves not found!")
Application.Exit()
End Try
If Not My.Computer.FileSystem.DirectoryExists("1") Then
Try
Rename("Saves", "1")
Catch ex As Exception
My.Computer.FileSystem.CreateDirectory("1")
End Try
End If
If Not My.Computer.FileSystem.DirectoryExists("2") Then
Try
Rename("Saves", "2")
Catch ex As Exception
My.Computer.FileSystem.CreateDirectory("2")
End Try
End If
If Not My.Computer.FileSystem.DirectoryExists("3") Then
Try
Rename("Saves", "3")
Catch ex As Exception
My.Computer.FileSystem.CreateDirectory("3")
End Try
End If
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked Then
Rename("1", "Saves")
End If
If RadioButton2.Checked Then
Rename("2", "Saves")
End If
If RadioButton3.Checked Then
Rename("3", "Saves")
End If
Application.Exit()
End Sub
End Class