2011-03-04 2 views
0

J'ai repris l'objet ASP classique d'un programmeur qui partait, et j'essaye de déboguer du code DAC. Le problème est que je ne comprends pas vraiment ce qu'est le DAC ou comment cela fonctionne - et je ne peux pas trouver le code DAC «vit».Où vivent les objets DAC (en ASP classique)?

est ici la ligne individuelle de code:

set runObj = server.CreateObject("DAC.clsDb_container") 

Nous utilisons SQL Server, et j'ai regardé dans Enterprise Manager sous les procédures stockées et les fonctions définies par l'utilisateur, mais je ne vois rien du nom clsDB_container.

Des suggestions où je peux trouver le code pour cet objet DAC?

Le code complet dans le contexte:

FUNCTION getNewGUID 
    Dim runCON, runObj, runCMD 

    DebugWrite("<BEGIN> iRoutines.asp|getNewGUID (a) GUID=" & GUID & " dealernum=" & dealernum) 

    set runObj = server.CreateObject("DAC.clsDb_container") 
    if not runObj.run_query("EXEC sproc_createGUID") then 
     traperror(runObj.DB_ErrStr) 
    else 
     GUID = replace(runObj.get_by_ordinal(0),"-","") 
     dealernum_len = trim(cstr(len(dealernum))) 
     set runObj = nothing 
    end if 
    getNewGUID = dealernum_len & dealernum & GUID 
    DebugWrite("<END> iRoutines.asp|getNewGUID (b) getNewGUID=" & getNewGUID & " dealernum=" & dealernum) 
END FUNCTION 

Répondre

3

Cela ressemble à un objet COM personnalisé qui a été écrit comme une couche d'accès aux données pour le site.

Le nom de l'objet est DAC.clsDb_container et réside dans une DLL quelque part sur le serveur Web.

Ce n'est pas standard - vous aurez besoin de chercher (je devine ici) le code VB6 ou Delphi qui l'a créé si vous voulez être davantage éclairé.

2

si vous avez besoin est un GUID alors vous pouvez le faire

<% 

Function createGuid() 

Set TypeLib = Server.CreateObject("Scriptlet.TypeLib") 

dim tg : tg = TypeLib.Guid 

createGuid = left(tg, len(tg)-2) 

Set TypeLib = Nothing 

End Function 

%> 
+0

Ma question suivante allait être « Est-il un moyen plus facile d'obtenir un GUID ». Merci d'avoir répondu. –