⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 jingdian.asp

📁 部分功能:1.查询旅游信息:主要查询景点和酒店的信息
💻 ASP
字号:

<%

function JingDian() {};

JingDian.TianJia = function (mingCheng, tianQi, diYu, dengJi, luXian, zhuSu, feiYong) {
	if (mingCheng==null) throw new Error("缺少mingCheng参数");
	if (!/^.{1,50}$/.test(mingCheng)) throw new Error("mingCheng参数错误");
	if (tianQi==null) throw new Error("缺少tianQi参数");
	if (!/^.{1,50}$/.test(tianQi)) throw new Error("tianQi参数错误");
	if (diYu==null) throw new Error("缺少diYu参数");
	if (!/^.{1,50}$/.test(diYu)) throw new Error("diYu参数错误");
	if (dengJi==null) throw new Error("缺少dengJi参数");
	if (!/^.{1,50}$/.test(dengJi)) throw new Error("dengJi参数错误");
	if (luXian==null) throw new Error("缺少luXian参数");
	if (!/^.{1,255}$/.test(luXian)) throw new Error("uXian参数l错误");
	if (zhuSu==null) throw new Error("缺少zhuSu参数");
	if (!/^.{1,50}$/.test(zhuSu)) throw new Error("zhuSu参数错误");
	if (feiYong==null) throw new Error("缺少feiYong参数");
	if (!/^.{1,50}$/.test()) throw new Error("feiYong参数错误");

	var connection;
	var command;
	connection = new ActiveXObject("ADODB.Connection");
	connection.ConnectionString = Application("ConnectionString");
	command = new ActiveXObject("ADODB.Command");
	command.CommandText = "INSERT INTO JingDian (MingCheng, TianQi, DiYu, DengJi, LuXian, ZhuSu, FeiYong) VALUES (?, ?, ?, ?, ?, ?, ?);";
	command.CommandType = 0x0001 || 0x00000080; // adCmdText + adExecuteNoRecords;
	var prmMingCheng = command.CreateParameter("prmMingCheng", 8, 1, 50, mingCheng);
	var prmTianQi = command.CreateParameter("prmTianQi", 8, 1, 50, tianQi);
	var prmDiYu = command.CreateParameter("prmDiYu", 8, 1, 50, diYu);
	var prmDengJi = command.CreateParameter("prmDengJi", 8, 1, 50, dengJi);
	var prmLuXian = command.CreateParameter("prmLuXian", 8, 1, 255, luXian);
	var prmZhuSu = command.CreateParameter("prmZhuSu", 8, 1, 50, zhuSu);
	var prmFeiYong = command.CreateParameter("prmFeiYong", 8, 1, 50, feiYong);
	command.Parameters.Append(prmMingCheng);
	command.Parameters.Append(prmTianQi);
	command.Parameters.Append(prmDiYu);
	command.Parameters.Append(prmDengJi);
	command.Parameters.Append(prmLuXian);
	command.Parameters.Append(prmZhuSu);
	command.Parameters.Append(prmFeiYong);
	try {
		connection.Open();
		command.ActiveConnection = connection;
		command.Execute();
		connection.Close();
	} catch(e) {
		if (connection.State != 0) connection.Close();
		throw e;
		//throw new Error("写入数据库错误");
	}
};
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -