% If Request.Form.Count > 0 Then %> <% End If %> <% 'Set MyConn = Server.CreateObject("ADODB.Connection") 'MyConn.Open "DSN=homestaysingapore;Pwd=vulcan404" Set MyConn = Server.CreateObject("ADODB.Connection") DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtest=DSNtest & "DBQ=D:\Hosting\WwwRoot\homestaysingapore_com\database\homestaysingapore.mdb" MyConn.Open DSNtest %>
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||