bigeagle 于 2000-11-9 10:47:22 加贴在 joy asp ↑:
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=iso-8859-1">
<title>odbc sql server @softwing.com</title>
</head>
<body bgcolor=#ffffff>
<%
set xobj = server.createobject("softwing.odbcregtool")
strdriver = "sql server"
strdsn = "dsn=new sql server data source" & vbnullchar & "description=new sql server data source" &
vbnullchar
strdsn = strdsn & "server=(local)" & vbnullchar
strdsn = strdsn & "database=pubs" & vbnullchar & vbnullchar
retval = xobj.createdsn(strdriver, strdsn)
if retval = true then
response.write "dsn creation successful."
else
response.write "dsn creation failed."
%>
</body>
</html>
