I took my old exploit and added a vgui and made it list every registered weapon on that server.
Code:
local weplist = weapons.GetList()
local primarywep = ""
local secondarywep = ""
local grenadewep = ""
local frame = vgui.Create("DFrame")
frame:SetSize(400, 400)
frame:SetDraggable(true)
frame:ShowCloseButton(true)
frame:MakePopup()
frame:Center()
local wlist = vgui.Create("DListView", frame)
wlist:SetSize(380, 310)
wlist:AddColumn("Weapon Name")
wlist:AddColumn("Class Name")
wlist:Center()
for k=1,table.Count(weplist),1 do
local a = weplist[k]
wlist:AddLine( a.PrintName, a.ClassName)
end 
local primary = vgui.Create("DButton", frame)
primary:SetSize(220/4, 40)
primary:SetPos(25, 360)
primary:SetText("Primary")
primary.DoClick = function()
primarywep = wlist:GetLine(wlist:GetSelectedLine()):GetValue(2)
end
local secondary = vgui.Create("DButton", frame)
secondary:SetSize(220/4, 40)
secondary:SetPos(125, 360)
secondary:SetText("Secondary")
secondary.DoClick = function()
secondarywep = wlist:GetLine(wlist:GetSelectedLine()):GetValue(2)
end
local grenade = vgui.Create("DButton", frame)
grenade:SetSize(220/4, 40)
grenade:SetPos(225, 360)
grenade:SetText("Grenade")
grenade.DoClick = function()
grenadewep = wlist:GetLine(wlist:GetSelectedLine()):GetValue(2)
end
local submit = vgui.Create("DButton", frame)
submit:SetSize(220/4, 40)
submit:SetPos(325, 360)
submit:SetText("Submit")
submit.DoClick = function()
net.Start("sv_saveweapons")
net.WriteString(primarywep) //Primary
net.WriteString(secondarywep) // Secondary
net.WriteString(grenadewep) // Grenade
net.SendToServer()
end
I dont have a Key hook or anything because the main server i play on uses leyac and it detects the hooks but not the rest, so you'll have to open it each time.