mysql - 经典 ASP 添加记录到 MySQL

Question

我不得不将旧的经典 ASP 项目转移到新主机，并且在连接到他们的 MySQL 服务器时遇到问题。

我在下面附上了我与旧主机一起使用的脚本，该脚本现在出现错误

Data source name not found and no default driver specified

经过一番挖掘后，我似乎必须将驱动程序更改为 {MySQL ODBC 5.3 Unicode Driver} 但它仍然错误。它似乎指向光标/锁定类型，但我使用了所有选项但没有成功。

ODBC driver does not support the requested properties.

<%
Dim Conn
Dim Rs
Dim sql

Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")

Conn.Open "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=xxx; PORT=xxx; DATABASE=xxx; UID=xxx; PASSWORD=xxx; OPTION=3"

sql= "SELECT * FROM table;" 

Rs.CursorType = 2 
Rs.LockType = 3 

Rs.Open sql, Conn    

Rs.AddNew 

Rs.Fields("database") = Request.Form("form")

Rs.Update   
Rs.Close
Set Rs = Nothing
Set Conn = Nothing
%>

Answer 1

您不需要它来插入记录。相反，使用所有数据库驱动程序都应支持的纯 SQL:

Dim oCommand
Const adInteger = 3
Const adDate = 7
Const adVarChar = 200
sql = "Insert Into table (database) Values (?)" 
Set oCommand = Server.Createobject("ADODB.Command")
Set oCommand.ActiveConnection = Conn
oCommand.CommandText = sql
oCommand.Parameters.Append(oCommand.CreateParameter("database", adVarChar, , 512, Request.Form("form")) )
oCommand.Execute

这确实需要写更多一些，但应该保留其他方式的所有好处(例如 SQL 注入(inject)攻击保护)并且不依赖于特定的驱动程序。