local DataStoreService = game:GetService("DataStoreService")
local dataStore = DataStoreService:GetDataStore("DataStore")
local key = "key-123"

function setData(data)
	local success, result = pcall(function()
		dataStore:SetAsync(key, data)
	end)
	if not success then
		warn(result)
	end
end

function getVersionAtTime(timestamp)
	local success, result, keyInfo = pcall(function()
		return dataStore:GetVersionAtTimeAsync(key, timestamp.UnixTimestampMillis)
	end)
	if success then
		if result == nil then
			print("ไม่พบเวอร์ชันที่เวลานี้")
		else
			print(result, keyInfo.Version)
		end
	else
		warn(result)
	end
end

-- ทำงานเมื่อ 2024/12/02 6:00 UTC
setData("เวอร์ชัน 1")

-- ทำงานเมื่อ 2024/12/02 9:00 UTC
setData("เวอร์ชัน 2")

-- พิมพ์ "ไม่พบเวอร์ชันที่เวลานี้"
local time1 = DateTime.fromUniversalTime(2024, 12, 02, 05, 00)
getVersionAtTime(time1)

-- พิมพ์ "เวอร์ชัน 1 <version>"
local time2 = DateTime.fromUniversalTime(2024, 12, 02, 07, 00)
getVersionAtTime(time2)

-- พิมพ์ "เวอร์ชัน 2 <version>"
local time3 = DateTime.fromUniversalTime(2024, 12, 02, 10, 00)
getVersionAtTime(time3)

local DataStoreService = game:GetService("DataStoreService")

local experienceStore = DataStoreService:GetDataStore("PlayerExperience")

local time = DateTime.fromUniversalTime(2020, 10, 09, 01, 42)

local listSuccess, pages = pcall(function()
	return experienceStore:ListVersionsAsync("User_1234", nil, time.UnixTimestampMillis)
end)

if listSuccess then
	local items = pages:GetCurrentPage()

	for key, info in pairs(items) do
		print("คีย์:", key, "; เวอร์ชัน:", info.Version, "; สร้างเมื่อ:", info.CreatedTime, "; ลบ:", info.IsDeleted)
	end
end