View' leri sorgulama

Merhaba sql' den veri tabani içindeki standart view' leri sorguladigimda sonuçlar gelmiyor. Örnegin FATANA view' ini sql' den "SELECT * FROM FATANA" ile sorguladigimda sadece basliklar geliyor ancak içerigi getirmiyor.

Programin içinden, rapordan serbest rapor olusturunca bu dosyanin içerigini getiriyor.

View lere sql sorgu gönderemiyor muyuz? Gönderebiliyorsak tablolari sorgulamadan farkli olarak ne yapmaliyim?

Tesekkürler...  

Çok tesekkürler, verdiginiz kodu sorgunun basina ekledim, simdi çalisiyor.

Bu kod tam olarak ne yapiyor? Bu konuda ayrintili bilgi bulabilecegim internette bir kaynak var mi?

Tesekkürler. Yalniz simdi baska bir sorum daha var, yukarida bahsettigim sorguyu bir web sayfasi içinden çalistiriyorum ve gelen sonuçlarda türkçe karakterler hatali geliyor. Forum içinde aradim ama bununla ilgili bir çözüm bulamadim. Bu sorunu nasil çözebilirim?

Bahsettigim web sayfasini FrontPage2000 içindeki database baglanti sihirbazi ile yaptim. Bu islem otomatik olarak global.asa adinda bir dosya olusturuyor ve içinde yine otomatik hazirladigi bir VBScript ile veri tabanina baglaniyor.

global.asa' nin içerigi söyle:

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
    '==FrontPage Generated - startspan==
    Dim FrontPage_UrlVars(2)
    '--Project Data Connection
        Application("OFIS2008_ConnectionString") = "DRIVER={SQL Server};SERVER=ofis-server;DATABASE=OFIS2008;UID=SA"
        Application("OFIS2008_ConnectionTimeout") = 15
        Application("OFIS2008_CommandTimeout") = 30
        Application("OFIS2008_CursorLocation") = 3
        Application("OFIS2008_RuntimeUserName") = "SA"
        Application("OFIS2008_RuntimePassword") = ""
    '--Project Data Connection
        Application("OFIS2007_ConnectionString") = "DRIVER={SQL Server};SERVER=OFIS-SERVER;DATABASE=OFIS2007;UID=SA"
        Application("OFIS2007_ConnectionTimeout") = 15
        Application("OFIS2007_CommandTimeout") = 30
        Application("OFIS2007_CursorLocation") = 3
        Application("OFIS2007_RuntimeUserName") = "SA"
        Application("OFIS2007_RuntimePassword") = ""
    '--
    Application("FrontPage_UrlVars") = FrontPage_UrlVars
    '==FrontPage Generated - endspan==
End Sub
Sub Session_OnStart
    FrontPage_StartSession '==FrontPage Generated==
End Sub
Sub FrontPage_StartSession
    On Error Resume Next
    if Len(Application("FrontPage_VRoot")) > 0 then Exit Sub
    ' discover the VRoot for the current page;
    ' walk back up VPath until we find global.asa
    Vroot = Request.ServerVariables("PATH_INFO")
    strG1 = "global.asa"
    strG2 = "Global.asa"
    iCount = 0
    do while Len(Vroot) > 1
        idx = InStrRev(Vroot, "/")
        if idx > 0 then
            Vroot = Left(Vroot,idx)
        else
            ' error; assume root web
            Vroot = "/"
        end if
        if FrontPage_FileExists(Server.MapPath(Vroot & strG1)) then exit do
        if FrontPage_FileExists(Server.MapPath(Vroot & strG2)) then exit do
        if Right(Vroot,1) = "/" then Vroot = Left(Vroot,Len(Vroot)-1)
        iCount = iCount + 1
        if iCount > 100 then
            ' error; assume root web
            Vroot = "/"
            exit do
        end if
    loop
    ' map all URL= attributes in _ConnectionString variables
    Application.Lock
    if Len(Application("FrontPage_VRoot")) = 0 then
        Application("FrontPage_VRoot") = Vroot
        UrlVarArray = Application("FrontPage_UrlVars")
        for i = 0 to UBound(UrlVarArray)
            if Len(UrlVarArray(i)) > 0 then FrontPage_MapUrl(UrlVarArray(i))
        next
    end if
    Application.Unlock
End Sub
Sub FrontPage_MapUrl(AppVarName)
    ' convert URL attribute in conn string to absolute file location
    strVal = Application(AppVarName)
    strKey = "URL="
    idxStart = InStr(strVal, strKey)
    If idxStart = 0 Then Exit Sub
    strBefore = Left(strVal, idxStart - 1)
    idxStart = idxStart + Len(strKey)
    idxEnd = InStr(idxStart, strVal, ";")
    If idxEnd = 0 Then
        strAfter = ""
        strURL = Mid(strVal, idxStart)
    Else
        strAfter = ";" & Mid(strVal, idxEnd + 1)
        strURL = Mid(strVal, idxStart, idxEnd - idxStart)
    End If
    strOut = strBefore & Server.MapPath(Application("FrontPage_VRoot") & strURL) & strAfter
    Application(AppVarName) = strOut
End Sub
Function FrontPage_FileExists(fspath)
    On Error Resume Next
    FrontPage_FileExists = False
    set fs = CreateObject("Scripting.FileSystemObject")
    Err.Clear
    set istream = fs.OpenTextFile(fspath)
    if Err.Number = 0 then
        FrontPage_FileExists = True
        istream.Close
    end if
    set istream = Nothing
    set fs = Nothing
End Function
</SCRIPT>

iki tarafa da söle bir sey ekleyip deneyin.      Application("OFIS2008_AutoTranslate") =False

Bir yorum getiremiyorum maalesef.

ALTER FUNCTION [dbo].[TRKK](@A NVARCHAR(4000))
RETURNS NVARCHAR(4000)  
AS
BEGIN
  DECLARE @TMP NVARCHAR(4000)
  SET @TMP = REPLACE(@A COLLATE LATIN1_GENERAL_BIN, CHAR(208), N'G')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(220), N'Ü')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(222), N'S')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(221), N'I')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(214), N'Ö')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(199), N'Ç')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(73), N'I')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(240), N'g')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(252), N'ü')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(254), N's')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(105), N'i')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(246), N'ö')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(231), N'ç')
  SET @TMP = REPLACE(@TMP COLLATE LATIN1_GENERAL_BIN, CHAR(253), N'i')
  RETURN @TMP
END

Bahsettiginiz çözüm sorunumu halletti. Her ikinize de yardimlariniz için tesekkürler.