申请了外国的支持asp的空间，但提交数据保存时间时却是当地时间，与我们差了13个就时间，请问

ready 2002-03-19 01:04:41

有什么办法能改变一下时间为我们的时间然后再存入吗？
比如他们的时间现在是 3/18/2002 11:56:18 PM
而我们是 3/19/2002 13:56:18 AM

...全文

55 9 打赏收藏转发到动态举报

写回复

用AI写文章

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

wmspy 2002-04-02

打赏
举报

那就从数据库中提出时间的时候把它加上CDate(1*8/24)

julyclyde 2002-03-19

打赏
举报

Visual Basic Scripting Edition

SetLocale 函数
请参阅
GetLocale 函数 | 区域设置 ID (LCID) 表
设置全球区域设置，并返回以前的区域设置。

SetLocale(lcid)
lcid 参数可以是任意一个合法的 32 位数值或短字符串，该值必须唯一标识一个地理区域。能被识别的值可以查阅区域设置 ID 表。

说明
若 lcid 为零，区域被设置为与当前系统设置匹配。

一个 locale 是用户参考信息集合，与用户的语言、国家/地区和文化传统有关。该 locale 决定键盘布局、字母排序顺序和日期、时间、数字与货币格式。

下面举例说明 SetLocale 函数的用法。要使用该代码，请复制标准HTML 文件中 <BODY> 标志之间的所有内容。

Enter Date in UK format: <input type="text" id="UKDate" size="20"><p>
Here's the US equivalent: <input type="text" id="USdate" size="20"><p>
<input type="button" value="Convert" id="button1"><p>
Enter a price in German: <input type="text" id="GermanNumber" size="20">
<p>
Here's the UK equivalent: <input type="text" id="USNumber" size="20"><p>
<input type="button" value="Convert" id="button2"><p>

<script language="vbscript">
Dim currentLocale
' 获取当前的区域设置
currentLocale = GetLocale

Sub Button1_onclick
Dim original
original = SetLocale("en-gb")
mydate = CDate(UKDate.value)
' IE 始终将区域设置设置为“美国英语”，
' 所以请使用 currentLocale 变量将区域设置设置为“美国英语”。
original = SetLocale(currentLocale)
USDate.value = FormatDateTime(mydate,vbShortDate)
End Sub

Sub button2_onclick
Dim original
original = SetLocale("de")
myvalue = CCur(GermanNumber.value)
original = SetLocale("en-gb")
USNumber.value = FormatCurrency(myvalue)
End Sub

</script>
请参阅
GetLocale 函数 | 区域设置 ID (LCID) 表

--------------------------------------------------------------------------------

© 2001 Microsoft Corporation. 保留所有权利。

ready 2002-03-19