asp 连接 mysql 代码
连接代码1直接输入
<%
Dim my_conn, sql,rs
Set my_conn = createobject("ADODB.Connection")
my_conn.open = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=localhost;"_ '服务器名
& "DATABASE=mybase;"_ '数据库名
& "UID=root;PWD=111; OPTION=35;" '用户名和密码
Set rs = Server.CreateObject("ADODB.Recordset")
%>
连接代码2用到了数据源
Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
conn.Open "DSN=mybase" ' 数据源名
下面是关闭和数据库的连接
my_conn.close ' Close database connection
Set my_conn = nothing 'obj variable released
相关文档：
※ 关于MySQL的1067错误解决方法 ※
内容：
*************
1
安装MYSQL后更改了ROOT的密码后用
net startmysql
启动时我就遇到了这样的问题．使用以下命令后
c:\mysql\bin\mysqladmin-u root -p shutdown
再net start mysql就没有这个错误提示了!
*************
2
MySQL的1067错误
Q：我的Mysql碰到了 1 ......
下午看了一段PHP100的视频。
也算有点收获。
里面的一段自写的findall的SQL函数：
public function findall($table) {
$this->query("SELECT * from $table");
}
原来只是这么简单，刚还在思考。
使用了TAB键上面的顿号来修饰MYSQL里的字段名，如：
UPDATE tablename SET `fieldname`='values' wh ......
将Excel数据导入MySql
1.将选中的数据快儿拷贝到一个TXT文本文件中（记得把后面的空格消掉。。），假如存到“D:\data.txt”这个位置里。
2.根据要导入的数据快儿建立MySql数据库和表，然后进入命令提示符里使用命令
load data local infile 'D:\data.txt' into table exceltomysql fields terminated ......
ASP通过cookie实现自动记住密码的功能
把以下代码加入验证页：
<%if Trim(Cstr(request.QueryString("check")))="true" then ‘用来判断是否有选择记住密码
Response.Cookies("UserCookie")("username") = Trim(Cstr(request.Form("username")))
Response.Cookies("UserCookie")("passwords") = trim ......
Function WriteToUTF(content,sFilen)'content为替换后的字符串,filename为生成的文件名
dim objStream
Set objStream = Server.CreateObject("ADODB.Stream")
With objStream
.Open
&nb ......
