Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
é o seguinte eu não sei fazer a conexão com o banco de dados com o caminho virtual, sei fazer com o caminho fisico!!!Poderiam colcocar esse a conexão virtual nesse codigo para mim??
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%><!--#include file="Connections/hotmail.asp" --><%' *** Restrict Access To Page: Grant or deny access to this pageMM_authorizedUsers=""MM_authFailedURL="login.asp"MM_grantAccess=falseIf Session("MM_Username") <> "" Then If (true Or CStr(Session("MM_UserAuthorization"))="") Or _ (InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1) Then MM_grantAccess = true End IfEnd IfIf Not MM_grantAccess Then MM_qsChar = "?" If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&" MM_referrer = Request.ServerVariables("URL") if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" & Request.QueryString() MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" & Server.URLEncode(MM_referrer) Response.Redirect(MM_authFailedURL)End If%><%Dim hotmailDim hotmail_numRowsSet hotmail = Server.CreateObject("ADODB.Recordset")hotmail.ActiveConnection = MM_hotmail_STRINGhotmail.Source = "SELECT * FROM HOTMAIL ORDER BY ID DESC"hotmail.CursorType = 0hotmail.CursorLocation = 2hotmail.LockType = 1hotmail.Open()hotmail_numRows = 0%><%Dim Repeat1__numRowsDim Repeat1__indexRepeat1__numRows = -1Repeat1__index = 0hotmail_numRows = hotmail_numRows + Repeat1__numRows%>
Carregando comentários...